summaryrefslogtreecommitdiff
path: root/lisp/progmodes/compile.el
diff options
context:
space:
mode:
authorRobert J. Chassell <bob@rattlesnake.com>2002-05-30 13:47:32 +0000
committerRobert J. Chassell <bob@rattlesnake.com>2002-05-30 13:47:32 +0000
commitb765ba644ce6bdc6676365ba8a141253d88288dc (patch)
tree3a1dcccd0ef7e17c201f6952ec80a84b00f2a839 /lisp/progmodes/compile.el
parenta579b36f344af5b6626da7086e957e03d34ef121 (diff)
downloademacs-b765ba644ce6bdc6676365ba8a141253d88288dc.tar.gz
Modified doc string to say that the kill-compilation function also
kills processes made by a grep command; created a defalias, kill-grep.
Diffstat (limited to 'lisp/progmodes/compile.el')
-rw-r--r--lisp/progmodes/compile.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 689c095f521..02fa3abb90c 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -1385,15 +1385,15 @@ Does NOT find the source line like \\[next-error]."
(interactive "p")
(compilation-next-file (- n)))
-
(defun kill-compilation ()
- "Kill the process made by the \\[compile] command."
+ "Kill the process made by the \\[compile] or \\[grep] commands."
(interactive)
(let ((buffer (compilation-find-buffer)))
(if (get-buffer-process buffer)
(interrupt-process (get-buffer-process buffer))
(error "The compilation process is not running"))))
+(defalias 'kill-grep 'kill-compilation)
;; Parse any new errors in the compilation buffer,
;; or reparse from the beginning if the user has asked for that.