@@ -1392,7 +1392,7 @@ citation = try $ do
1392 key <- citeKey
1392 key <- citeKey
1393 loc <- option "" locator
1393 loc <- option "" locator
1394 return $ Citation{ citationId = key
1394 return $ Citation{ citationId = key
1395− , citationPrefix = [Str pref]
1395+ , citationPrefix = if pref /= [] then [Str pref] else []
1396 , citationSuffix = []
1396 , citationSuffix = []
1397 , citationLocator = loc
1397 , citationLocator = loc
1398 , citationMode = if suppress_auth
1398 , citationMode = if suppress_auth