git.iko.soy/typeable/pandoc
on master help sign in
change reference backlink from RawInline to Link so it gets rendered properly when using the xmlhtml package
commit6cd20c98fd80f4c8fcdd4796f356e06757e36746 authorEric Seidel <gridaphobe@gmail.com> dateSat 24 Dec 2011, 21:49 (15 years ago) parentcc18291
1 file changed+1−2
src/Text/Pandoc/Writers/HTML.hs+1−2
src/Text/Pandoc/Writers/HTML.hs+1−2
@@ -663,8 +663,7 @@ blockListToNote :: WriterOptions -> String -> [Block] -> State WriterState Html
663663blockListToNote opts ref blocks =
664664 -- If last block is Para or Plain, include the backlink at the end of
665665 -- that block. Otherwise, insert a new Plain block with the backlink.
666− let backlink = [RawInline "html" $ " <a href=\"#" ++ writerIdentifierPrefix opts ++ "fnref" ++ ref ++
667− "\" class=\"footnoteBackLink\">↩</a>"]
666+ let backlink = [Link [Str "↩"] ("#" ++ writerIdentifierPrefix opts ++ "fnref" ++ ref,[])]
668667 blocks' = if null blocks
669668 then []
670669 else let lastBlock = last blocks