aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers
diff options
context:
space:
mode:
authorJohn MacFarlane <fiddlosopher@gmail.com>2012-04-14 17:51:29 -0700
committerJohn MacFarlane <fiddlosopher@gmail.com>2012-04-14 17:51:29 -0700
commitfe5704bebc91428013cef306f33e7c98e4ac43be (patch)
treea8591c212f1d3702afa2536d15903779b3b86af4 /src/Text/Pandoc/Readers
parent2198ac080bb97828b9770d0522b1d4d854deb8c2 (diff)
downloadpandoc-fe5704bebc91428013cef306f33e7c98e4ac43be.tar.gz
Handle blockquote tag in docbook reader.
Diffstat (limited to 'src/Text/Pandoc/Readers')
-rw-r--r--src/Text/Pandoc/Readers/DocBook.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/DocBook.hs b/src/Text/Pandoc/Readers/DocBook.hs
index 488e179da..432daeeea 100644
--- a/src/Text/Pandoc/Readers/DocBook.hs
+++ b/src/Text/Pandoc/Readers/DocBook.hs
@@ -25,6 +25,7 @@ parseBlock (Text (CData _ s _)) = if all isSpace s
parseBlock (Elem e) =
case qName (elName e) of
"para" -> para <$> getInlines e
+ "blockquote" -> blockQuote <$> innerBlocks
"sect1" -> sect 1
"sect2" -> sect 2
"sect3" -> sect 3