git.iko.soy/typeable/pandoc
on master help sign in
Fixed spacing bugs involving code block attributes.
54782c2John MacFarlane
src/Text/Pandoc/Readers/RST.hs+1−1
compare with master
unifiedsplit
@@ -611,7 +611,7 @@ codeblock numberLines lang body =
611 kvs = case numberLines of
611 kvs = case numberLines of
612 Just "" -> []
612 Just "" -> []
613 Nothing -> []
613 Nothing -> []
614− Just n -> [("startFrom",n)]
614+ Just n -> [("startFrom",trim n)]
615
615
616---
616---
617--- note block
617--- note block
src/Text/Pandoc/Writers/Markdown.hs+1−1
@@ -328,7 +328,7 @@ blockToMarkdown opts (CodeBlock attribs str) = return $
328 | otherwise -> replicate (n+1) '~'
328 | otherwise -> replicate (n+1) '~'
329 backticks = text "```"
329 backticks = text "```"
330 attrs = if isEnabled Ext_fenced_code_attributes opts
330 attrs = if isEnabled Ext_fenced_code_attributes opts
331− then attrsToMarkdown attribs
331+ then nowrap $ attrsToMarkdown attribs
332 else empty
332 else empty
333blockToMarkdown opts (BlockQuote blocks) = do
333blockToMarkdown opts (BlockQuote blocks) = do
334 st <- get
334 st <- get