From a2a63642656ff9bc851b40909458f9f79c104c5e Mon Sep 17 00:00:00 2001 From: =?utf8?q?Miha=20Rihtar=C5=A1i=C4=8D?= Date: Wed, 24 Feb 2021 17:38:56 +0100 Subject: [PATCH] Run all functions in `prefix-command-echo-keystrokes-functions' * lisp/simple.el (internal-echo-keystrokes-prefix): Really run all functions in `prefix-command-echo-keystrokes-functions' (bug#46727). Copyright-paperwork-exempt: yes --- lisp/simple.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/simple.el b/lisp/simple.el index 1dfc3374ade..403861351c9 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -4670,7 +4670,7 @@ see other processes running on the system, use `list-system-processes'." (setq prefix-command--last-echo (let ((strs nil)) (run-hook-wrapped 'prefix-command-echo-keystrokes-functions - (lambda (fun) (push (funcall fun) strs))) + (lambda (fun) (push (funcall fun) strs) nil)) (setq strs (delq nil strs)) (when strs (mapconcat #'identity strs " ")))))) -- 2.39.2