From a64ca63859669b3cd3319a80a7030ee5f2b3d829 Mon Sep 17 00:00:00 2001
From: filliatr
Date: Thu, 19 Jun 2003 11:51:42 +0000
Subject: undo de "Time tactic"

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4180 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 2b07ca4c9f..f17beb6044 100644
--- a/ide/coqide.ml
+++ b/ide/coqide.ml
@@ -1237,7 +1237,7 @@ Please restart and report NOW.";
 	    self#clear_message
 	  in
 	  begin match last_command with 
-	  | {ast=_,VernacSolve _} -> 
+	  | {ast=_, (VernacSolve _ | VernacTime (VernacSolve _))} -> 
 	      begin 
 		try Pfedit.undo 1; ignore (pop ()); update_input () 
 		with _ -> self#backtrack_to_no_lock start
-- 
cgit v1.2.3