diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/GF/Translate/GFT.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Translate/GFT.hs b/src/GF/Translate/GFT.hs index 0dd42c6d2..5f82ccff0 100644 --- a/src/GF/Translate/GFT.hs +++ b/src/GF/Translate/GFT.hs @@ -27,7 +27,7 @@ main = do ---- interact (doTranslate grs cat) s <- getLine - putStrLnFlush $ doTranslate grs cat s + putStrLnFlush $ doTranslate grs cat $ drop 2 s doTranslate grs cat s = let ss = [l +++ ":" +++ s | (l,s) <- zip (map (prIdent . cncId) grs) |