Mercurial > emacs
changeset 14250:61fe711e4ae4
(compilation-handle-exit): If process-status doesn't
exist (e.g. on MSDOS), use an empty string.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Sun, 21 Jan 1996 03:55:57 +0000 |
| parents | 0d6508ed26a2 |
| children | 9cacb2dd365c |
| files | lisp/progmodes/compile.el |
| diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/compile.el Sun Jan 21 03:54:12 1996 +0000 +++ b/lisp/progmodes/compile.el Sun Jan 21 03:55:57 1996 +0000 @@ -601,7 +601,10 @@ (forward-char 1) (setq mode-line-process (format ":%s [%s]" - (process-status proc) (cdr status))) + (if (fboundp 'process-status) + (process-status proc) + "") + (cdr status))) ;; Force mode line redisplay soon. (force-mode-line-update) (if (and opoint (< opoint omax))