@@ -138,7 +138,7 @@ toCslCite c
138138 ("",(x:_),AuthorInText) | not (isPunct x)
139139 -> [Str ",",Space] ++ s
140140 _ -> s
141− isPunct (Str (c:_)) = isPunctuation c
141+ isPunct (Str (x:_)) = isPunctuation x
142142 isPunct _ = False
143143 citMode = case citationMode c of
144144 AuthorInText -> (True, False)