Fixed spacing bugs involving code block attributes.
Closes #763.
commit54782c2af68c1b80d69ee028e74dd5ed17c0a934
authorJohn MacFarlane <jgm@berkeley.edu>
dateMon 11 Mar 2013, 20:45 (14 years ago)
parentf7229b1
src/Text/Pandoc/Readers/RST.hs+1−1
@@ -611,7 +611,7 @@ codeblock numberLines lang body =
611611 kvs = case numberLines of
612612 Just "" -> []
613613 Nothing -> []
614− Just n -> [("startFrom",n)]
614+ Just n -> [("startFrom",trim n)]
615615
616616---
617617--- note block
src/Text/Pandoc/Writers/Markdown.hs+1−1
@@ -328,7 +328,7 @@ blockToMarkdown opts (CodeBlock attribs str) = return $
328328 | otherwise -> replicate (n+1) '~'
329329 backticks = text "```"
330330 attrs = if isEnabled Ext_fenced_code_attributes opts
331− then attrsToMarkdown attribs
331+ then nowrap $ attrsToMarkdown attribs
332332 else empty
333333blockToMarkdown opts (BlockQuote blocks) = do
334334 st <- get