@@ -254,7 +254,7 @@ blockToMarkdown opts (CodeBlock attribs str) = return $
254254 if writerStrictMarkdown opts || attribs == nullAttr
255255 then nest (writerTabStop opts) (text str) <> blankline
256256 else -- use delimited code block
257− flush (tildes <> space <> attrs <> cr <> text str <>
257+ (tildes <> space <> attrs <> cr <> text str <>
258258 cr <> tildes) <> blankline
259259 where tildes = text "~~~~"
260260 attrs = attrsToMarkdown attribs