Fixed shadowing warning.

2012-06-08 11:12:56 -07:00 · 2012-06-08 11:12:56 -07:00 · c24b7991aa
commit c24b7991aa
parent 9fc72d1ff2
1 changed files with 1 additions and 1 deletions
--- a/src/Text/Pandoc/Biblio.hs
+++ b/src/Text/Pandoc/Biblio.hs
@ -138,7 +138,7 @@ toCslCite c
                         ("",(x:_),AuthorInText) | not (isPunct x)
                                                 -> [Str ",",Space] ++ s
                         _                       -> s
-          isPunct (Str (c:_)) = isPunctuation c
+          isPunct (Str (x:_)) = isPunctuation x
          isPunct _           = False
          citMode = case citationMode c of
                      AuthorInText   -> (True, False)