aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJohn MacFarlane <fiddlosopher@gmail.com>2012-05-10 10:10:20 -0700
committerJohn MacFarlane <fiddlosopher@gmail.com>2012-05-10 10:10:20 -0700
commit4d9a1324aedaac2a73bcf611687655453b400748 (patch)
tree0fe962d6286ba7a0aa68f338134f1ae0e6930d1d /src
parent858bf197fedd46101b3371cd91e505ff79080643 (diff)
downloadpandoc-4d9a1324aedaac2a73bcf611687655453b400748.tar.gz
DocBook reader: areaspec, area, areaset
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Readers/DocBook.hs9
1 files changed, 6 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Readers/DocBook.hs b/src/Text/Pandoc/Readers/DocBook.hs
index e3116bc6f..0d0adf649 100644
--- a/src/Text/Pandoc/Readers/DocBook.hs
+++ b/src/Text/Pandoc/Readers/DocBook.hs
@@ -31,9 +31,9 @@ List of all DocBook tags, with [x] indicating implemented,
[x] appendix - An appendix in a Book or Article
[ ] appendixinfo - Meta-information for an Appendix
[ ] application - The name of a software program
-[ ] area - A region defined for a Callout in a graphic or code example
-[ ] areaset - A set of related areas in a graphic or code example
-[ ] areaspec - A collection of regions in a graphic or code example
+[x] area - A region defined for a Callout in a graphic or code example
+[x] areaset - A set of related areas in a graphic or code example
+[x] areaspec - A collection of regions in a graphic or code example
[ ] arg - An argument in a CmdSynopsis
[x] article - An article
[x] articleinfo - Meta-information for an Article
@@ -616,6 +616,9 @@ parseBlock (Elem e) =
<$> getBlocks e
"warning" -> blockQuote . (para (strong $ str "Warning") <>)
<$> getBlocks e
+ "area" -> return mempty
+ "areaset" -> return mempty
+ "areaspec" -> return mempty
"qandadiv" -> gets dbSectionLevel >>= sect . (+1)
"question" -> addToStart (strong (str "Q:") <> str " ") <$> getBlocks e
"answer" -> addToStart (strong (str "A:") <> str " ") <$> getBlocks e