From 37bf89abbdf13845fbfc159c388715dc294d6488 Mon Sep 17 00:00:00 2001 From: Markus Rost Date: Fri, 13 Dec 2002 22:37:37 +0000 Subject: [PATCH] (compilation-menu-map): Use `kill-compilation' to stop compilation. --- lisp/progmodes/compile.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index a85551d20d4..44f1178c112 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -1161,7 +1161,7 @@ exited abnormally with code %d\n" (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] -- 2.39.2