@@ -441,6 +441,7 @@ blockToParagraphs (DefinitionList entries) = do
441 definition <- concatMapM (blockToParagraphs . BlockQuote) blksLst
441 definition <- concatMapM (blockToParagraphs . BlockQuote) blksLst
442 return $ term ++ definition
442 return $ term ++ definition
443 concatMapM go entries
443 concatMapM go entries
444+blockToParagraphs (Div (_, ("notes" : []), _) _) = return []
444blockToParagraphs (Div _ blks) = concatMapM blockToParagraphs blks
445blockToParagraphs (Div _ blks) = concatMapM blockToParagraphs blks
445blockToParagraphs blk = do
446blockToParagraphs blk = do
446 P.report $ BlockNotRendered blk
447 P.report $ BlockNotRendered blk