@@ -1392,7 +1392,7 @@ citation = try $ do
13921392 key <- citeKey
13931393 loc <- option "" locator
13941394 return $ Citation{ citationId = key
1395− , citationPrefix = [Str pref]
1395+ , citationPrefix = if pref /= [] then [Str pref] else []
13961396 , citationSuffix = []
13971397 , citationLocator = loc
13981398 , citationMode = if suppress_auth