diff options
| author | Jim Blandy | 1992-11-07 06:12:11 +0000 |
|---|---|---|
| committer | Jim Blandy | 1992-11-07 06:12:11 +0000 |
| commit | bea1d57a7849cc9ffd0def067415ae9f43ed8dc3 (patch) | |
| tree | d78ea1f9c56ba7317a3f4da2f9a8b8aa15ed3485 | |
| parent | 0761aafc4586a806cc7b9d341f52957239c3e235 (diff) | |
| download | emacs-bea1d57a7849cc9ffd0def067415ae9f43ed8dc3.tar.gz emacs-bea1d57a7849cc9ffd0def067415ae9f43ed8dc3.zip | |
* compile.el (compile-internal): Use NAME-OF-MODE in the prompt
when offering to kill an existing process.
| -rw-r--r-- | lisp/progmodes/compile.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index a01ec3dcace..8a5bd07b25b 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el | |||
| @@ -243,7 +243,8 @@ Returns the compilation buffer created." | |||
| 243 | (if comp-proc | 243 | (if comp-proc |
| 244 | (if (or (not (eq (process-status comp-proc) 'run)) | 244 | (if (or (not (eq (process-status comp-proc) 'run)) |
| 245 | (yes-or-no-p | 245 | (yes-or-no-p |
| 246 | "A compilation process is running; kill it? ")) | 246 | (format "A %s process is running; kill it? " |
| 247 | name-of-mode))) | ||
| 247 | (condition-case () | 248 | (condition-case () |
| 248 | (progn | 249 | (progn |
| 249 | (interrupt-process comp-proc) | 250 | (interrupt-process comp-proc) |