@@ -405,7 +405,11 @@ blockToMarkdown' opts (Plain inlines) = do
405405 not isPlain && beginsWithOrderedListMarker rendered
406406 then text $ escapeDelimiter rendered
407407 else contents
408− return $ contents' <> cr
408+ -- escape if para starts with %
409+ return $
410+ if isEnabled Ext_pandoc_title_block opts && take 1 rendered == "%"
411+ then "\\" <> contents' <> cr
412+ else contents' <> cr
409413-- title beginning with fig: indicates figure
410414blockToMarkdown' opts (Para [Image attr alt (src,'f':'i':'g':':':tit)]) =
411415 blockToMarkdown opts (Para [Image attr alt (src,tit)])