aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSean Whitton2021-02-05 10:06:22 +0100
committerLars Ingebrigtsen2021-02-05 10:06:22 +0100
commit7016db933cd529c3cbc157b126dc17df8f2ff165 (patch)
tree1d1d57ca7e50824db7a722cf482b56e40ae01c4a
parentf06acf752a27b0ab34eae5e2342579863ede3b2f (diff)
downloademacs-7016db933cd529c3cbc157b126dc17df8f2ff165.tar.gz
emacs-7016db933cd529c3cbc157b126dc17df8f2ff165.zip
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).
-rw-r--r--lisp/repeat.el4
1 files changed, 1 insertions, 3 deletions
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\"."
239 (car (memq last-command-event 239 (car (memq last-command-event
240 (listify-key-sequence 240 (listify-key-sequence
241 repeat-on-final-keystroke)))))) 241 repeat-on-final-keystroke))))))
242 (if (memq last-repeatable-command '(exit-minibuffer 242 (if (eq last-repeatable-command (caar command-history))
243 minibuffer-complete-and-exit
244 self-insert-and-exit))
245 (let ((repeat-command (car command-history))) 243 (let ((repeat-command (car command-history)))
246 (repeat-message "Repeating %S" repeat-command) 244 (repeat-message "Repeating %S" repeat-command)
247 (eval repeat-command)) 245 (eval repeat-command))