Mercurial > emacs

changeset 55313:f7017af1bd0b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(compilation-start): In the no-async-subprocesses branch, fontify the buffer explicitly after the process exits.
author Eli Zaretskii <eliz@gnu.org>
date Sun, 02 May 2004 17:22:08 +0000
parents 3b7a4fa9b2d8
children 5108ca4dfab4
files lisp/progmodes/compile.el
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/compile.el	Sun May 02 17:17:57 2004 +0000
+++ b/lisp/progmodes/compile.el	Sun May 02 17:22:08 2004 +0000
@@ -959,6 +959,10 @@
 					  (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