(compilation-start): In the no-async-subprocesses branch, fontify

the buffer explicitly after the process exits.

1 files changed, 4 insertions, 0 deletions

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 376136e33ae..da05a7ff8bb 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -959,6 +959,10 @@ exited abnormally with code %d\n"
                                           (concat status "\n")))
                 (t
                  (compilation-handle-exit 'bizarre status status))))
+        ;; Without async subprocesses, the buffer is not yet
+        ;; fontified, so fontify it now.
+        (let ((font-lock-verbose nil))  ; shut up font-lock messages
+          (font-lock-fontify-buffer))
         (message "Executing `%s'...done" command)))
     (if (buffer-local-value 'compilation-scroll-output outbuf)
         (save-selected-window