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)