From 0398f6669575542c4ee092de3596037d27dfb2eb Mon Sep 17 00:00:00 2001 From: Henning Guenther Date: Sun, 22 Feb 2009 10:36:03 -0800 Subject: [PATCH] Remove Hack Warning darcs-hash:20090222183603-a4fee-b9435eb4652e49092c8c3b875e72006ff03b9de2 --- Data/Encoding/Helper/Template.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Data/Encoding/Helper/Template.hs b/Data/Encoding/Helper/Template.hs index 230ede4..a92270a 100644 --- a/Data/Encoding/Helper/Template.hs +++ b/Data/Encoding/Helper/Template.hs @@ -58,7 +58,7 @@ readTranslation file = do [] -> Nothing ('#':xs) -> Nothing _ -> case words ln of - (src:"#UNDEFINED":_) -> Just (read src,Nothing) -- XXX: Find a better way to handle this + (src:"#UNDEFINED":_) -> Just (read src,Nothing) (src:trg:_) -> Just (read src,Just $ chr $ read trg) _ -> Nothing ) (lines cont)