ditt o datt

2004-04-23 13:45:07 +00:00
parent 2e0c510285
commit 233d6910e4
5 changed files with 9 additions and 5 deletions
--- a/src/GF/Source/PrintGF.hs
+++ b/src/GF/Source/PrintGF.hs
@@ -61,7 +61,7 @@ instance Print Char where
  prtList s = ["\"" ++ concatMap mkEsc s ++ "\""]

 mkEsc s = case s of
-  _ | elem s "\\\"'" -> '\\':[s]
+  _ | elem s "\\\"" -> '\\':[s]
  '\n' -> "\\n"
  '\t' -> "\\t"
  _ -> [s]