[Emacs-diffs] Changes to emacs/lisp/progmodes/compile.el

[Robert J. Chassell]

Index: emacs/lisp/progmodes/compile.el
diff -c emacs/lisp/progmodes/compile.el:1.254 
emacs/lisp/progmodes/compile.el:1.255
*** emacs/lisp/progmodes/compile.el:1.254       Thu May  9 21:00:07 2002
--- emacs/lisp/progmodes/compile.el     Thu May 30 09:47:32 2002
***************
*** 1385,1399 ****
    (interactive "p")
    (compilation-next-file (- n)))
  
- 
  (defun kill-compilation ()
!   "Kill the process made by the \\[compile] command."
    (interactive)
    (let ((buffer (compilation-find-buffer)))
      (if (get-buffer-process buffer)
        (interrupt-process (get-buffer-process buffer))
        (error "The compilation process is not running"))))
  
  
  ;; Parse any new errors in the compilation buffer,
  ;; or reparse from the beginning if the user has asked for that.
--- 1385,1399 ----
    (interactive "p")
    (compilation-next-file (- n)))
  
  (defun kill-compilation ()
!   "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.