diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Hakyll/Page.hs | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/src/Text/Hakyll/Page.hs b/src/Text/Hakyll/Page.hs index d2c73bd..54f9c84 100644 --- a/src/Text/Hakyll/Page.hs +++ b/src/Text/Hakyll/Page.hs @@ -58,14 +58,18 @@ getBody (Page page) = fromMaybe [] $ M.lookup "body" page -- | The default reader options for pandoc parsing. readerOptions :: ParserState -readerOptions = defaultParserState { stateSmart = True } +readerOptions = defaultParserState + { -- The following option causes pandoc to read smart typography, a nice + -- and free bonus. + stateSmart = True + } -- | The default writer options for pandoc rendering. writerOptions :: WriterOptions writerOptions = defaultWriterOptions { -- This option causes literate haskell to be written using '>' marks in -- html, which I think is a good default. - , writerLiterateHaskell = True + writerLiterateHaskell = True } -- | Get a render function for a given extension. |