Handle blockquote tag in docbook reader.
commitfe5704bebc91428013cef306f33e7c98e4ac43be
authorJohn MacFarlane <fiddlosopher@gmail.com>
dateSat 14 Apr 2012, 17:51 (15 years ago)
parent2198ac0
src/Text/Pandoc/Readers/DocBook.hs+1
@@ -25,6 +25,7 @@ parseBlock (Text (CData _ s _)) = if all isSpace s
2525parseBlock (Elem e) =
2626 case qName (elName e) of
2727 "para" -> para <$> getInlines e
28+ "blockquote" -> blockQuote <$> innerBlocks
2829 "sect1" -> sect 1
2930 "sect2" -> sect 2
3031 "sect3" -> sect 3