diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2020-08-21 12:18:34 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2020-08-21 12:22:33 -0700 |
| commit | 49e810b4ed3642cf549622046bd7f2b98c700894 (patch) | |
| tree | 845b1f9d5de490591556b269c601e0da041b4ff2 /src/Text/Pandoc/Writers/HTML.hs | |
| parent | c22b12100d11a5ebb9ab58f1829a44288b640b6d (diff) | |
| download | pandoc-49e810b4ed3642cf549622046bd7f2b98c700894.tar.gz | |
HTML writer: Fix addition of doc-biblioentry role.
Diffstat (limited to 'src/Text/Pandoc/Writers/HTML.hs')
| -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 4bfd95674..ab8e8ef93 100644 --- a/src/Text/Pandoc/Writers/HTML.hs +++ b/src/Text/Pandoc/Writers/HTML.hs @@ -743,7 +743,7 @@ blockToHtml opts (Div attr@(ident, classes, kvs') bs) = do ("width", w) <- kvs'] ++ [("role", "doc-bibliography") | ident == "refs" && html5] ++ [("role", "doc-biblioentry") - | "ref-item" `T.isPrefixOf` ident && html5] + | "ref-" `T.isPrefixOf` ident && html5] let speakerNotes = "notes" `elem` classes -- we don't want incremental output inside speaker notes, see #1394 let opts' = if | speakerNotes -> opts{ writerIncremental = False } |