Commit bea4b9ce authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(repeat): Don't let execute-kbd-macro alter real-last-command.

parent ad0fd6b9
......@@ -280,7 +280,10 @@ can be modified by the global variable `repeat-on-final-keystroke'."
(let ((indirect (indirect-function real-last-command)))
(if (or (stringp indirect)
(vectorp indirect))
(execute-kbd-macro real-last-command)
;; Bind real-last-command so that executing the macro
;; does not alter it.
(let ((real-last-command real-last-command))
(execute-kbd-macro real-last-command))
(call-interactively real-last-command)))))
(when repeat-repeat-char
;; A simple recursion here gets into trouble with max-lisp-eval-depth
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment