@@ -241,7 +241,7 @@ keyToMarkdown opts (label', (src, tit), attr) = do
241241 else space <> "\"" <> text tit <> "\""
242242 return $ nest 2 $ hang 2
243243 ("[" <> label' <> "]:" <> space) (text src <> tit')
244− <> linkAttributes opts attr
244+ <+> linkAttributes opts attr
245245
246246-- | Return markdown representation of notes.
247247notesToMarkdown :: PandocMonad m => WriterOptions -> [[Block]] -> MD m Doc