mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(undo): Fix previous change.

Browse source
This commit is contained in:
Richard M. Stallman 2005-04-13 17:40:53 +00:00
parent 9c27debdf0
commit 0047373b7d
2 changed files with 8 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2005-04-13 Richard M. Stallman <rms@gnu.org>
* simple.el (undo): Fix previous change.
* custom.el (defface): Doc fix.
2005-04-13 Lute Kamstra <lute@gnu.org>
* Makefile.in (DONTCOMPILE): Remove list.
@ -133,7 +139,7 @@
* dnd.el (dnd-protocol-alist): New file with generic DND functions.
2005-04-11 Stefan Monnier <monnier@iro.umontreal.ca>
2005-04-11 JUAN-LEON Lahoz Garcia <juanleon1@gmail.com>
* wdired.el: Doc fixes.
(wdired-confirm-overwrite): Rename from wdired-is-ok-overwrite.

2
lisp/simple.el
View file

@ -1341,7 +1341,7 @@ as an argument limits undo to changes within the current region."
(message (if undo-in-region
(if equiv "Redo in region!" "Undo in region!")
(if equiv "Redo!" "Undo!"))))
(when (and (listp equiv) undo-no-redo)
(when (and (consp equiv) undo-no-redo)
;; The equiv entry might point to another redo record if we have done
;; undo-redo-undo-redo-... so skip to the very last equiv.
(while (let ((next (gethash equiv undo-equiv-table)))