]> git.wincent.com - docvim.git/blobdiff - lib/Text/Docvim/Printer/Markdown.hs
Add additional blank line above headings
[docvim.git] / lib / Text / Docvim / Printer / Markdown.hs
index 142e0cfa1c0c5cb09da73fa7db55f4f7b468a79c..7b0773e4d7fdf5a308199466f4121c72c8cb19fe 100644 (file)
@@ -121,7 +121,7 @@ h3 = heading 3
 heading :: Int -> String -> Env
 heading level string = do
   metadata <- ask
-  return $ replicate level '#' ++ " " ++ string ++ anch (pluginName metadata) ++ "\n\n"
+  return $ "\n" ++ replicate level '#' ++ " " ++ string ++ anch (pluginName metadata) ++ "\n\n"
   where
     anch name = a $ Anchor [ Attribute "name" (sanitizeAnchor $ pre ++ string)
                            , Attribute "href" (gitHubAnchor $ pre ++ string)