aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorJohn MacFarlane <fiddlosopher@gmail.com>2014-04-04 21:39:08 -0700
committerJohn MacFarlane <fiddlosopher@gmail.com>2014-04-04 21:39:08 -0700
commite06aa97bb93cab5ddeadca5b65e45649663e527c (patch)
treea98b6e48e69aaea11efef4fcc813696285f7ba76 /src/Text/Pandoc
parentc5a0c7a8199698c3973e50db9e91ae2694e018d4 (diff)
downloadpandoc-e06aa97bb93cab5ddeadca5b65e45649663e527c.tar.gz
DocBook reader: set metadata "author" not "authors"
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Readers/DocBook.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/DocBook.hs b/src/Text/Pandoc/Readers/DocBook.hs
index 28af646c1..4fb38a07d 100644
--- a/src/Text/Pandoc/Readers/DocBook.hs
+++ b/src/Text/Pandoc/Readers/DocBook.hs
@@ -792,7 +792,7 @@ parseBlock (Elem e) =
getAuthor = (:[]) <$> getInlines e >>= addMeta "author"
getAuthorGroup = do
let terms = filterChildren (named "author") e
- mapM getInlines terms >>= addMeta "authors"
+ mapM getInlines terms >>= addMeta "author"
getDate = getInlines e >>= addMeta "date"
parseTable = do
let isCaption x = named "title" x || named "caption" x