remove left out debug message

2022-06-16 18:21:54 +02:00
parent 8ac0d881ed
commit 96c8218564
1 changed files with 1 additions and 1 deletions
--- a/src/server/PGFService.hs
+++ b/src/server/PGFService.hs
@@ -72,7 +72,7 @@ readGrammar mb_pgf path =
    ".pgf" -> readPGF path
    ".ngf" -> case mb_pgf of
                Nothing -> readNGF path
-                Just gr -> putStrLn "CHECKOUT!!!" >> checkoutPGF gr
+                Just gr -> checkoutPGF gr
    _      -> error "Extension must be .pgf or .ngf"

 newCache' rd = do c <- newCache rd