From: Jan Djärv <jan.h.d@swipnet.se>
Date: Fri, 28 Mar 2008 10:05:53 +0000 (+0000)
Subject: (grep-mode-tool-bar-map): The same.
X-Git-Tag: emacs-pretest-23.0.90~6842
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=94e65e0d28e1ce2984660f3c4749b9131af8a939;p=emacs.git

(grep-mode-tool-bar-map): The same.
---

diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el
index 6cd5c657aef..328588065c6 100644
--- a/lisp/progmodes/grep.el
+++ b/lisp/progmodes/grep.el
@@ -240,6 +240,8 @@ See `compilation-error-screen-columns'"
 	 :help "Goto next match")
 	(tool-bar-local-item 
 	 "cancel" 'kill-compilation 'kill-compilation map
+	 :enable '(let ((buffer (compilation-find-buffer)))
+		    (get-buffer-process buffer))
 	 :help "Stop grep")
 	(tool-bar-local-item 
 	 "refresh" 'recompile 'recompile map