diff options
| author | John MacFarlane <fiddlosopher@gmail.com> | 2012-05-07 10:06:11 -0700 |
|---|---|---|
| committer | John MacFarlane <fiddlosopher@gmail.com> | 2012-05-07 10:06:11 -0700 |
| commit | ffef28e86034db75d5c09ba4c6b5818922ef05ee (patch) | |
| tree | 7969c213054859dc4b5e8428fd835abb3955e165 | |
| parent | 8d6cc370d4dda452d82e60a1c1fc44aee166eba6 (diff) | |
| download | pandoc-ffef28e86034db75d5c09ba4c6b5818922ef05ee.tar.gz | |
DocBook reader: Skip chapterinfo.
| -rw-r--r-- | src/Text/Pandoc/Readers/DocBook.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/DocBook.hs b/src/Text/Pandoc/Readers/DocBook.hs index 7ddca20ff..b13c4bf2c 100644 --- a/src/Text/Pandoc/Readers/DocBook.hs +++ b/src/Text/Pandoc/Readers/DocBook.hs @@ -71,7 +71,7 @@ List of all DocBook tags, with [x] indicating implemented, [x] caption - A caption [x] caution - A note of caution [x] chapter - A chapter, as of a book -[ ] chapterinfo - Meta-information for a Chapter +[x] chapterinfo - Meta-information for a Chapter [ ] citation - An inline bibliographic reference to another published work [ ] citebiblioid - A citation of a bibliographic identifier [ ] citerefentry - A citation to a reference page @@ -619,6 +619,7 @@ parseBlock (Elem e) = "caption" -> return mempty "info" -> getTitle >> getAuthors >> getDate >> return mempty "articleinfo" -> getTitle >> getAuthors >> getDate >> return mempty + "chapterinfo" -> return mempty -- keywords & other metadata "bookinfo" -> getTitle >> getAuthors >> getDate >> return mempty "article" -> modify (\st -> st{ dbBook = False }) >> getTitle >> getBlocks e |