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

diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index e18aac8b30e7bd611e4ac7c567588e6a508ea373..31c365bf8501ce4ff92cda647b4a5b4a2ae9f4a8 100644 (file)
--- 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)