From ffe10c13e3851c33f8320328e9efb6814914a5a3 Mon Sep 17 00:00:00 2001
From: filliatr
Date: Fri, 6 Jun 2003 13:22:43 +0000
Subject: bug CoqIDE avec Goal

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4101 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 ide/coqide.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ide/coqide.ml b/ide/coqide.ml
index 5745878019..7331c97861 100644
--- a/ide/coqide.ml
+++ b/ide/coqide.ml
@@ -476,7 +476,7 @@ let update_on_end_of_proof id =
 	prerr_endline "Toggling Changing Reset id"; 
 	r := false
       end
-  | { ast = _, (VernacAbort _ | VernacAbortAll) } -> raise Exit
+  | { ast = _, (VernacAbort _ | VernacAbortAll | VernacGoal _) } -> raise Exit
   | _ -> ()
   in
   try Stack.iter lookup_lemma processed_stack with Exit -> ()
-- 
cgit v1.2.3