Commit 59f63e9a authored by Martin Rudalics's avatar Martin Rudalics
Browse files

(kmacro-end-macro): When ignoring empty macro

avoid incorrect kmacro-ring-empty-p messages.
parent 41bd52f7
......@@ -606,8 +606,11 @@ An argument of zero means repeat until error."
(unless executing-kbd-macro
(end-kbd-macro arg #'kmacro-loop-setup-function)
(when (and last-kbd-macro (= (length last-kbd-macro) 0))
(setq last-kbd-macro nil)
(message "Ignore empty macro")
(kmacro-pop-ring))))
;; Don't call `kmacro-ring-empty-p' to avoid its messages.
(while (and (null last-kbd-macro) kmacro-ring)
(kmacro-pop-ring1)))))
;;;###autoload
......
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