HTML writer: Fixed footnote backrefs in --ascii mode.
This commit is contained in:
1 parent
aec5489960
commit
fb5faaa91e
1 file changed
+2
-1
@@ -638,7 +638,8 @@ blockListToNote opts ref blocks =
|
||||
-- that block. Otherwise, insert a new Plain block with the backlink.
|
||||
let backlink = [RawInline "html" $ " <a href=\"#" ++ writerIdentifierPrefix opts ++ "fnref" ++ ref ++
|
||||
"\" class=\"footnoteBackLink\"" ++
|
||||
" title=\"Jump back to footnote " ++ ref ++ "\">↩</a>"]
|
||||
" title=\"Jump back to footnote " ++ ref ++ "\">" ++
|
||||
(if writerAscii opts then "↩" else "↩") ++ "</a>"]
|
||||
blocks' = if null blocks
|
||||
then []
|
||||
else let lastBlock = last blocks
|
||||
|
||||
Reference in new issue
Block a user