git.iko.soy/typeable/pandoc
on master help sign in
HTML writer: Fixed footnote backrefs in --ascii mode.
fb5faaaJohn MacFarlane
src/Text/Pandoc/Writers/HTML.hs+2−1
@@ -638,7 +638,8 @@ blockListToNote opts ref blocks =
638 -- that block. Otherwise, insert a new Plain block with the backlink.
638 -- that block. Otherwise, insert a new Plain block with the backlink.
639 let backlink = [RawInline "html" $ " <a href=\"#" ++ writerIdentifierPrefix opts ++ "fnref" ++ ref ++
639 let backlink = [RawInline "html" $ " <a href=\"#" ++ writerIdentifierPrefix opts ++ "fnref" ++ ref ++
640 "\" class=\"footnoteBackLink\"" ++
640 "\" class=\"footnoteBackLink\"" ++
641− " title=\"Jump back to footnote " ++ ref ++ "\">↩</a>"]
641+ " title=\"Jump back to footnote " ++ ref ++ "\">" ++
642+ (if writerAscii opts then "&#8617;" else "↩") ++ "</a>"]
642 blocks' = if null blocks
643 blocks' = if null blocks
643 then []
644 then []
644 else let lastBlock = last blocks
645 else let lastBlock = last blocks