From 233d6910e4716f078876541bfbd4ce6163ffd0c8 Mon Sep 17 00:00:00 2001
From: aarne <unknown>
Date: Fri, 23 Apr 2004 13:45:07 +0000
Subject: ditt o datt

---
 src/GF/Source/PrintGF.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/GF/Source/PrintGF.hs')

diff --git a/src/GF/Source/PrintGF.hs b/src/GF/Source/PrintGF.hs
index b06e09a1b..732cdb002 100644
--- 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]
-- 
cgit v1.2.3