From 49e810b4ed3642cf549622046bd7f2b98c700894 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Fri, 21 Aug 2020 12:18:34 -0700
Subject: [PATCH] HTML writer:  Fix addition of doc-biblioentry role.

---
 src/Text/Pandoc/Writers/HTML.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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 }