From 7378832a369ab964e5675ab979c85c37ad873a90 Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Fri, 19 Jul 2024 19:23:56 +0200 Subject: [PATCH] (minibuffer-message): Cease waiting when not in minibuffer --- lisp/minibuffer.el | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index e18aac8b30e..31c365bf850 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el @@ -779,12 +779,9 @@ through `format-message'. If some of the minibuffer text has the `minibuffer-message' text property, MESSAGE is shown at that position instead of EOB." (if (not (minibufferp (current-buffer) t)) - (progn - (if args - (apply #'message message args) - (message "%s" message)) - (prog1 (sit-for (or minibuffer-message-timeout 1000000)) - (message nil))) + (if args + (apply #'message message args) + (message "%s" message)) ;; Clear out any old echo-area message to make way for our new thing. (minibuffer--delete-message-overlay) (message nil) -- 2.39.5