Make sure native output ends in newline with --standalone.

2011-01-21 09:58:23 -08:00 · 2011-01-21 09:58:23 -08:00 · 5c35be1362
commit 5c35be1362
parent bfbc289871
8 changed files with 8 additions and 8 deletions
--- a/src/Text/Pandoc/Writers/Native.hs
+++ b/src/Text/Pandoc/Writers/Native.hs
@ -73,6 +73,6 @@ writeNative opts (Pandoc meta blocks) =
                    else Nothing
      withHead = if writerStandalone opts
                    then \bs -> text ("Pandoc " ++ "(" ++ show meta ++ ")") $$
-                           bs <> cr
+                           bs $$ cr
                    else id
  in  render colwidth $ withHead $ prettyList $ map prettyBlock blocks