From: Eshel Yaron <me@eshelyaron.com>
Date: Fri, 19 Jul 2024 17:23:56 +0000 (+0200)
Subject: (minibuffer-message): Cease waiting when not in minibuffer
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7378832a369ab964e5675ab979c85c37ad873a90;p=emacs.git

(minibuffer-message): Cease waiting when not in minibuffer
---

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)