changeset 48835:750e9e67d3e9

(compilation-menu-map): Use `kill-compilation' to stop compilation.
author Markus Rost <rost@math.uni-bielefeld.de>
date Fri, 13 Dec 2002 22:37:37 +0000
parents ffa5e816fcad
children 81333325d8f7
files lisp/progmodes/compile.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/compile.el	Fri Dec 13 19:52:46 2002 +0000
+++ b/lisp/progmodes/compile.el	Fri Dec 13 22:37:37 2002 +0000
@@ -1161,7 +1161,7 @@
 (defvar compilation-menu-map
   (let ((map (make-sparse-keymap "Errors")))
     (define-key map [stop-subjob]
-      '("Stop Compilation" . comint-interrupt-subjob))
+      '("Stop Compilation" . kill-compilation))
     (define-key map [compilation-mode-separator2]
       '("----" . nil))
     (define-key map [compilation-mode-first-error]