From: Sean Whitton <spwhitton@spwhitton.name>
Date: Fri, 5 Feb 2021 09:06:22 +0000 (+0100)
Subject: Fix repeating complex commands
X-Git-Tag: emacs-28.0.90~3923
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7016db933cd529c3cbc157b126dc17df8f2ff165;p=emacs.git

Fix repeating complex commands

* lisp/repeat.el (repeat): Fix repeating complex commands
(bug#46290).  This makes `M-: date RET C-x z' work again (like in
Emacs 21, apparently).
---

diff --git a/lisp/repeat.el b/lisp/repeat.el
index d4888893484..795577c93fc 100644
--- a/lisp/repeat.el
+++ b/lisp/repeat.el
@@ -239,9 +239,7 @@ recently executed command not bound to an input event\"."
            (car (memq last-command-event
                       (listify-key-sequence
                        repeat-on-final-keystroke))))))
-    (if (memq last-repeatable-command '(exit-minibuffer
-					minibuffer-complete-and-exit
-					self-insert-and-exit))
+    (if (eq last-repeatable-command (caar command-history))
         (let ((repeat-command (car command-history)))
           (repeat-message "Repeating %S" repeat-command)
           (eval repeat-command))