Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Text.Pandoc.Writer.Shared: fixed bug in tagWithAttrs.

Browse source 
A space was omitted before key-value attributes, leading
to invalid HTML.
This commit is contained in:
John MacFarlane 2013-10-26 18:22:59 -07:00
parent 416dad86dc
commit ac7714ca39
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/Text/Pandoc/Writers/Shared.hs
View file

@ -134,7 +134,6 @@ tagWithAttrs tag (ident,classes,kvs) = hsep
,if null classes
then empty
else "class=" <> doubleQuotes (text (unwords classes))
]
<> hsep (map (\(k,v) -> text k <> "=" <>
,hsep (map (\(k,v) -> text k <> "=" <>
doubleQuotes (text (escapeStringForXML v))) kvs)
<> ">"
] <> ">"