Fix bug with authors with "and" in name.

This commit is contained in:
Justin Hsu 2018-02-17 18:18:25 +00:00
parent 4ac7538d0c
commit adbb272984
1 changed files with 1 additions and 1 deletions

View File

@ -87,7 +87,7 @@ lookupBibEntry name (BibFile es) =
-------------------------------------------------------------------------------- --------------------------------------------------------------------------------
formatAuthors :: String -> String formatAuthors :: String -> String
formatAuthors auth = formatAuthors auth =
let auths = splitOn "and" auth let auths = splitOn " and" auth
swapped = fmap formatAuthor auths swapped = fmap formatAuthor auths
finalSep = case (length auths) of finalSep = case (length auths) of
1 -> "" 1 -> ""