From 5c35be13625895f52c66f98be81751b49b1b0365 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Fri, 21 Jan 2011 09:58:23 -0800
Subject: Make sure native output ends in newline with --standalone.

---
 src/Text/Pandoc/Writers/Native.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Text/Pandoc')

diff --git a/src/Text/Pandoc/Writers/Native.hs b/src/Text/Pandoc/Writers/Native.hs
index 2ebe83d6b..d2b56cd17 100644
--- 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
-- 
cgit v1.2.3