@@ -63,6 +63,10 @@ readerOptions = defaultParserState { stateSmart = True }
63-- | The default writer options for pandoc rendering.
63-- | The default writer options for pandoc rendering.
64writerOptions :: WriterOptions
64writerOptions :: WriterOptions
65writerOptions = defaultWriterOptions
65writerOptions = defaultWriterOptions
66+ { -- This option causes literate haskell to be written using '>' marks in
67+ -- html, which I think is a good default.
68+ , writerLiterateHaskell = True
67-- | Get a render function for a given extension.
71-- | Get a render function for a given extension.
68getRenderFunction :: String -> (String -> String)
72getRenderFunction :: String -> (String -> String)