diff options
author | John MacFarlane <fiddlosopher@gmail.com> | 2013-06-24 20:56:35 -0700 |
---|---|---|
committer | John MacFarlane <fiddlosopher@gmail.com> | 2013-06-25 22:32:50 -0700 |
commit | 08631ef1a3c8a3afe18694bbeb8fd3d6f580a589 (patch) | |
tree | 60d9a1da712c282b087571b8fc3d6b6f68a3437a /src/Text/Pandoc/Writers | |
parent | 3aa5733f30b6daf755a00d0c2a318fb55a177289 (diff) |
Some test suite fixes for new metadata.
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r-- | src/Text/Pandoc/Writers/Native.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Native.hs b/src/Text/Pandoc/Writers/Native.hs index afe73102c..090b97433 100644 --- a/src/Text/Pandoc/Writers/Native.hs +++ b/src/Text/Pandoc/Writers/Native.hs @@ -72,7 +72,7 @@ writeNative opts (Pandoc meta blocks) = then Just $ writerColumns opts else Nothing withHead = if writerStandalone opts - then \bs -> text ("Pandoc (" ++ show meta ++ ") ") $$ + then \bs -> text ("Pandoc (" ++ show meta ++ ")") $$ bs $$ cr else id in render colwidth $ withHead $ prettyList $ map prettyBlock blocks |