From cb182ce6f8d2fa6e1509252fecc2b0e504e36d63 Mon Sep 17 00:00:00 2001 From: Alex Branham Date: Fri, 14 Jun 2019 10:00:29 -0500 Subject: [PATCH] * lisp/simple.el (undo): Make message less enthusiastic --- lisp/simple.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/simple.el b/lisp/simple.el index 5ef5d3dc2ea..766cb017b7d 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -2530,7 +2530,7 @@ as an argument limits undo to changes within the current region." ;; so, ask the user whether she wants to skip the redo/undo pair. (let ((equiv (gethash pending-undo-list undo-equiv-table))) (or (eq (selected-window) (minibuffer-window)) - (setq message (format "%s%s!" + (setq message (format "%s%s" (if (or undo-no-redo (not equiv)) "Undo" "Redo") (if undo-in-region " in region" "")))) -- 2.39.2