summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers/Markdown.hs
diff options
context:
space:
mode:
authorMauro Bieg <mb21@users.noreply.github.com>2017-05-03 12:13:25 +0200
committerJohn MacFarlane <jgm@berkeley.edu>2017-05-03 12:13:25 +0200
commite02cfcdeaccf588399579283998a7fb93a5c08f6 (patch)
treefbebd6449d49370f7ebc2b37ed3bcf3842ce6e0d /src/Text/Pandoc/Writers/Markdown.hs
parentcd2551c16c1da0404b8de182f17160aebb69219d (diff)
Markdown Writer: put space before reference link definitions
Fixes #3630 (#3631). Previously the attributes in link reference definitions did not have a space preceding.
Diffstat (limited to 'src/Text/Pandoc/Writers/Markdown.hs')
-rw-r--r--src/Text/Pandoc/Writers/Markdown.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Markdown.hs b/src/Text/Pandoc/Writers/Markdown.hs
index 8e3ac3665..655fd8780 100644
--- a/src/Text/Pandoc/Writers/Markdown.hs
+++ b/src/Text/Pandoc/Writers/Markdown.hs
@@ -241,7 +241,7 @@ keyToMarkdown opts (label', (src, tit), attr) = do
else space <> "\"" <> text tit <> "\""
return $ nest 2 $ hang 2
("[" <> label' <> "]:" <> space) (text src <> tit')
- <> linkAttributes opts attr
+ <+> linkAttributes opts attr
-- | Return markdown representation of notes.
notesToMarkdown :: PandocMonad m => WriterOptions -> [[Block]] -> MD m Doc