diff options
author | Mauro Bieg <mb21@users.noreply.github.com> | 2019-05-28 18:31:41 +0200 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2019-05-28 12:31:41 -0400 |
commit | 3f57f49033d78fab158af77983611ffcb5cac4bc (patch) | |
tree | a97af38267738c5975b2aabcff0d0807c2e45323 /src/Text/Pandoc/Writers | |
parent | 0e2d6561bef9b0558b0bd96fa06e748a51219d88 (diff) | |
download | pandoc-3f57f49033d78fab158af77983611ffcb5cac4bc.tar.gz |
HTML writer: emit empty alt tag in figures (#5518)
The same text is already in the <figcaption> and
screen-readers would read it twice, see #4737
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r-- | src/Text/Pandoc/Writers/HTML.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs index 2c386b465..5004f4111 100644 --- a/src/Text/Pandoc/Writers/HTML.hs +++ b/src/Text/Pandoc/Writers/HTML.hs @@ -681,7 +681,7 @@ figure :: PandocMonad m => WriterOptions -> Attr -> [Inline] -> (String, String) -> StateT WriterState m Html figure opts attr txt (s,tit) = do - img <- inlineToHtml opts (Image attr txt (s,tit)) + img <- inlineToHtml opts (Image attr [Str ""] (s,tit)) html5 <- gets stHtml5 let tocapt = if html5 then H5.figcaption |