@@ -138,7 +138,7 @@ toCslCite c
138 ("",(x:_),AuthorInText) | not (isPunct x)
138 ("",(x:_),AuthorInText) | not (isPunct x)
139 -> [Str ",",Space] ++ s
139 -> [Str ",",Space] ++ s
141− isPunct (Str (c:_)) = isPunctuation c
141+ isPunct (Str (x:_)) = isPunctuation x
142 isPunct _ = False
142 isPunct _ = False
143 citMode = case citationMode c of
143 citMode = case citationMode c of
144 AuthorInText -> (True, False)
144 AuthorInText -> (True, False)