aboutsummaryrefslogtreecommitdiff
path: root/ide/undo.ml
diff options
context:
space:
mode:
authormonate2003-03-07 19:07:26 +0000
committermonate2003-03-07 19:07:26 +0000
commitfe9eef0e5f1b3068b5458670f40f588d151a4752 (patch)
tree0036b018c34d7d64541bc2ce03a728c990781a46 /ide/undo.ml
parent519af89c1395b85bc1b17041504096feaea01777 (diff)
coqide: corrections pour utf8 de coq. highlight synchrone=repare le bug autorepeat des paste. configuration des accel rateurs. les chaines peuvent contenir des points. Bug: les phrases ne peuvent pas contenir .\sep. Or c'est permis par les Notation.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3750 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide/undo.ml')
-rw-r--r--ide/undo.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/ide/undo.ml b/ide/undo.ml
index 1b74926cb1..d172ec605c 100644
--- a/ide/undo.ml
+++ b/ide/undo.ml
@@ -41,7 +41,8 @@ object(self)
end
- method clear_undo = Stack.clear history
+ method clear_undo = Stack.clear history; Stack.clear nredo; Queue.clear redo
+
method undo = if !undo_lock then begin
undo_lock := false;
prerr_endline "UNDO";