summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/progmodes/compile.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 5317aeb3b8c..4cd464e1c2a 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -398,6 +398,7 @@ Returns the compilation buffer created."
(cons proc compilation-in-progress)))
;; No asynchronous processes available
(message (format "Executing `%s'..." command))
+ (sit-for 0) ;; Force redisplay
(let ((status (call-process shell-file-name nil outbuf nil "-c"
command))))
(message (format "Executing `%s'...done" command)))))