From 46c9a500df0b893aed46c17fbb487bec8e5940c3 Mon Sep 17 00:00:00 2001 From: krasimir Date: Fri, 25 Apr 2008 15:49:53 +0000 Subject: [PATCH] use putStrLn instead of print to dump error messages. This avoids the double quotes --- src/GF/Command/Importing.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/GF/Command/Importing.hs b/src/GF/Command/Importing.hs index b223e3e5c..a09ba8de6 100644 --- a/src/GF/Command/Importing.hs +++ b/src/GF/Command/Importing.hs @@ -20,7 +20,7 @@ importGrammar mgr0 opts files = case res of Ok gfcc2 -> do let gfcc3 = unionGFCC (gfcc mgr0) gfcc2 return $ MultiGrammar gfcc3 - Bad msg -> do print msg + Bad msg -> do putStrLn msg return mgr0 ".gfcc" -> do gfcc2 <- mapM file2gfcc files >>= return . foldl1 unionGFCC