# HG changeset patch
# User Robert J. Chassell <bob@rattlesnake.com>
# Date 1022766452 0
# Node ID 08fe4d4199573eb6ef0ad1fa100afb5a9360af1a
# Parent  d997ffad4f09aeb2c1f5c537456058e298527a53
Modified doc string to say that the kill-compilation function also
kills processes made by a grep command; created a defalias, kill-grep.

diff -r d997ffad4f09 -r 08fe4d419957 lisp/progmodes/compile.el
--- a/lisp/progmodes/compile.el	Thu May 30 01:07:52 2002 +0000
+++ b/lisp/progmodes/compile.el	Thu May 30 13:47:32 2002 +0000
@@ -1385,15 +1385,15 @@
   (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.