Added --lhs-out option.

+ Added writerLiterateHaskell to WriterOptions.
+ Added --lhs-out option to Main.
+ Added --lhs option (combines --lhs-out and --lhs-in)


git-svn-id: https://pandoc.googlecode.com/svn/trunk@1500 788f1e2b-df1e-0410-8736-df70ead52e1b

1 files changed, 2 insertions, 0 deletions

diff --git a/Text/Pandoc/Shared.hs b/Text/Pandoc/Shared.hs
index 799c35e0f..f8c5e8d17 100644
--- a/Text/Pandoc/Shared.hs
+++ b/Text/Pandoc/Shared.hs
@@ -901,6 +901,7 @@ data WriterOptions = WriterOptions
   , writerStrictMarkdown  :: Bool   -- ^ Use strict markdown syntax
   , writerReferenceLinks  :: Bool   -- ^ Use reference links in writing markdown, rst
   , writerWrapText        :: Bool   -- ^ Wrap text to line length
+  , writerLiterateHaskell :: Bool   -- ^ Write as literate haskell
   } deriving Show
 
 -- | Default writer options.
@@ -921,6 +922,7 @@ defaultWriterOptions =
                 , writerStrictMarkdown  = False
                 , writerReferenceLinks  = False
                 , writerWrapText        = True
+                , writerLiterateHaskell = False
                 }
 
 --