@@ -317,11 +317,11 @@ title = try $ do
317317authors :: GenParser Char ParserState Block
318318authors = try $ do
319319 string "\\author{"
320− authors' <- sepBy (many1 (notFollowedBy (oneOf "};,") >> inline)) (oneOf ",;")
320+ raw <- many1 (notFollowedBy (char '}') >> inline)
321+ let authors' = map normalizeSpaces $ splitBy LineBreak raw
321322 char '}'
322323 spaces
323− let authors'' = map normalizeSpaces authors'
324− updateState (\s -> s { stateAuthors = authors'' })
324+ updateState (\s -> s { stateAuthors = authors' })
325325 return Null
326326
327327date :: GenParser Char ParserState Block