diff options
author | John MacFarlane <jgm@berkeley.edu> | 2012-07-26 08:37:14 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2012-07-26 08:37:14 -0700 |
commit | 3053267280bfd7b255f3bf47480e4a8a97ec2915 (patch) | |
tree | 250d412cf27f89d30208007feddb1ccb8320c4af | |
parent | 800e772d6e81629a774550770143ac412303cffb (diff) | |
download | pandoc-3053267280bfd7b255f3bf47480e4a8a97ec2915.tar.gz |
Fixed MakeManPage for new reader signature.
-rw-r--r-- | MakeManPage.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/MakeManPage.hs b/MakeManPage.hs index 9315e6989..517386e7c 100644 --- a/MakeManPage.hs +++ b/MakeManPage.hs @@ -15,7 +15,7 @@ import qualified Control.Exception as E main = do rmContents <- liftM toString $ B.readFile "README" - let (Pandoc meta blocks) = readMarkdown defaultParserState rmContents + let (Pandoc meta blocks) = readMarkdown def rmContents let manBlocks = removeSect [Str "Wrappers"] $ removeSect [Str "Pandoc's",Space,Str "markdown"] blocks let syntaxBlocks = extractSect [Str "Pandoc's",Space,Str "markdown"] blocks |