Commit 5cb9f2db authored by Karl Heuer's avatar Karl Heuer
Browse files

(compilation-sentinel): Include exit status in modeline.

parent c1b97b44
......@@ -539,7 +539,8 @@ See `compilation-mode'."
(forward-char 1)
(setq mode-line-process
(concat ":"
(symbol-name (process-status proc))))
(symbol-name (process-status proc))
" [" (process-exit-status proc) "]"))
;; Since the buffer and mode line will show that the
;; process is dead, we can delete it now. Otherwise it
;; will stay around until M-x list-processes.
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment