@@ -1074,12 +1074,12 @@ simpleCiteArgs = try $ do
1075citationLabel :: PandocMonad m => LP m String
1075citationLabel :: PandocMonad m => LP m String
1076citationLabel = do
1076citationLabel = do
1077− optional sp
1077+ optional spaces
1078 toksToString <$>
1078 toksToString <$>
1079 (many1 (satisfyTok isWordTok <|> symbolIn bibtexKeyChar)
1079 (many1 (satisfyTok isWordTok <|> symbolIn bibtexKeyChar)
1080− <* optional sp
1080+ <* optional spaces
1081 <* optional (symbol ',')
1081 <* optional (symbol ',')
1082− <* optional sp)
1082+ <* optional spaces)
1083 where bibtexKeyChar = ".:;?!`'()/*@_+=-[]" :: [Char]
1083 where bibtexKeyChar = ".:;?!`'()/*@_+=-[]" :: [Char]
1085cites :: PandocMonad m => CitationMode -> Bool -> LP m [Citation]
1085cites :: PandocMonad m => CitationMode -> Bool -> LP m [Citation]