changeset 61531:34b31319dc9b

(undo): Fix previous change.
author Richard M. Stallman <rms@gnu.org>
date Wed, 13 Apr 2005 17:39:55 +0000
parents a4f9ea538274
children 6b2da0d6965f
files lisp/simple.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Wed Apr 13 17:39:00 2005 +0000
+++ b/lisp/simple.el	Wed Apr 13 17:39:55 2005 +0000
@@ -1341,7 +1341,7 @@
 	  (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)))