Mercurial > emacs
changeset 7072:5da29eb68c82
(compilation-setup, compilation-sentinel):
Remove space after `:' in mode-line-process.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 24 Apr 1994 08:15:18 +0000 |
| parents | 058f19d36c07 |
| children | c662b47cda3f |
| files | lisp/progmodes/compile.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/compile.el Sun Apr 24 08:14:46 1994 +0000 +++ b/lisp/progmodes/compile.el Sun Apr 24 08:15:18 1994 +0000 @@ -413,7 +413,7 @@ ;; Prepare the buffer for the compilation parsing commands to work. (defun compilation-setup () ;; Make the buffer's mode line show process state. - (setq mode-line-process '(": %s")) + (setq mode-line-process '(":%s")) (set (make-local-variable 'compilation-error-list) nil) (set (make-local-variable 'compilation-old-error-list) nil) (set (make-local-variable 'compilation-parsing-end) 1) @@ -474,7 +474,7 @@ (insert " at " (substring (current-time-string) 0 19)) (forward-char 1) (setq mode-line-process - (concat ": " + (concat ":" (symbol-name (process-status proc)))) ;; Since the buffer and mode line will show that the ;; process is dead, we can delete it now. Otherwise it