From 5d638526803e87b581547c3f39ef32f2d355d3cc Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Fri, 30 May 2008 17:13:38 +0000
Subject: [PATCH] unforgetting new env after i command

---
 src-3.0/GFI.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src-3.0/GFI.hs b/src-3.0/GFI.hs
index 46c6be9c9..92c835123 100644
--- a/src-3.0/GFI.hs
+++ b/src-3.0/GFI.hs
@@ -47,7 +47,7 @@ loop opts gfenv0 = do
                     Ok (opts',files) -> importInEnv gfenv (addOptions opts opts') files
                     Bad err -> do putStrLn $ "Command parse error: " ++ err
                                   return gfenv
-        loopNewCPU gfenv
+        loopNewCPU gfenv'
 
   -- other special commands, working on GFEnv
     "e":_ -> loopNewCPU $ gfenv {commandenv=env{multigrammar=emptyPGF}}