diff options
Diffstat (limited to 'src/GF/Command/Importing.hs')
| -rw-r--r-- | src/GF/Command/Importing.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 |