; * lisp/simple.el (primitive-undo): Clarify error message (bug#60467)

diff --git a/lisp/simple.el b/lisp/simple.el
index 16f23ea36236d43265006ac0b6199efcba25f4dc..63479e9ce0a8db63457a3f300cc6b6606a73bce1 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -3590,7 +3590,7 @@ Return what remains of the list."
                    ;; said it would do.
                    (unless (and (= start start-mark)
                                 (= (+ delta end) end-mark))
-                     (error "Changes to be undone by function different from announced"))
+                     (error "Changes undone by function are different from the announced ones"))
                    (set-marker start-mark nil)
                    (set-marker end-mark nil))
                (apply fun-args))