From 12b4943a3745c6abdaf44f8a0a12529f4d6fd02b Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Fri, 24 Mar 1995 00:48:45 +0000 Subject: [PATCH] (compilation-sentinel): Use `format'; `concat' doesn't stringize integers anymore. --- lisp/progmodes/compile.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index c6c14bd60be..3a9cd3218e5 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -550,9 +550,8 @@ See `compilation-mode'." (insert " at " (substring (current-time-string) 0 19)) (forward-char 1) (setq mode-line-process - (concat ":" - (symbol-name (process-status proc)) - " [" (process-exit-status proc) "]")) + (format ":%s [%d]" (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. -- 2.39.5