opensource/pandoc
3
0
Fork 0
mirror of https://github.com/jgm/pandoc.git synced 2026-09-24 15:44:59 +08:00
Code Issues Packages Projects Releases Wiki Activity

LaTeX reader: Fixed bug in authors.

Browse Source
This commit is contained in:
John MacFarlane
2012-02-05 09:06:34 -08:00
parent bae3b49a5a
commit 922469bbb2
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Text/Pandoc/Readers/LaTeX.hs
+3 -1
View File
@@ -266,8 +266,10 @@ addSubtitle tit = updateState (\s -> s{ stateTitle = stateTitle s ++
authors :: LP ()
authors = try $ do
char '{'
let oneAuthor = mconcat <$> many1 (notFollowedBy' (controlSeq "and") >> inline)
let oneAuthor = mconcat <$>
many1 (notFollowedBy' (controlSeq "and") >> inline)
auths <- sepBy oneAuthor (controlSeq "and")
char '}'
updateState (\s -> s { stateAuthors = map (normalizeSpaces . toList) auths })
addDate :: Inlines -> LP ()