diff options
| author | Alexander Krotov <ilabdsf@gmail.com> | 2019-05-10 09:17:21 +0300 |
|---|---|---|
| committer | Alexander <ilabdsf@gmail.com> | 2019-05-15 13:31:07 +0300 |
| commit | 2e13c0a451fe87ebd1ef2c314f7f98c40f3ec422 (patch) | |
| tree | 1605436f78a79b8de8149c86fb5b29c5b6e79326 /src/Text/Pandoc | |
| parent | f1fbec938f0df271845ca00eec17d95a896136f8 (diff) | |
| download | pandoc-2e13c0a451fe87ebd1ef2c314f7f98c40f3ec422.tar.gz | |
FB2 writer: do not wrap note references into <sup> and brackets
Existing FB2 readers, such as FBReader, already display links with type="note" as a superscript.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/FB2.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/FB2.hs b/src/Text/Pandoc/Writers/FB2.hs index 950240df5..d2527a0a9 100644 --- a/src/Text/Pandoc/Writers/FB2.hs +++ b/src/Text/Pandoc/Writers/FB2.hs @@ -439,7 +439,7 @@ toXml (Note bs) = do let fn_id = footnoteID n fn_desc <- cMapM blockToXml bs modify (\s -> s { footnotes = (n, fn_id, fn_desc) : fns }) - let fn_ref = el "sup" . txt $ "[" ++ show n ++ "]" + let fn_ref = txt $ "[" ++ show n ++ "]" return . list $ el "a" ( [ attr ("l","href") ('#':fn_id) , uattr "type" "note" ] , fn_ref ) |