# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1232844893 0
# Node ID 2bdde6d84336ee9ec9ab7a427256004d897ec7d7
# Parent  577a3b5b05f5b4ba21fba2b58d97d60af53f703d
(grep-mode-map): Put grep-find before grep and
change its title from "Recursive grep..." to "Grep via Find...".
Add menu items for lgrep and rgrep.

diff -r 577a3b5b05f5 -r 2bdde6d84336 lisp/progmodes/grep.el
--- a/lisp/progmodes/grep.el	Sat Jan 24 23:42:42 2009 +0000
+++ b/lisp/progmodes/grep.el	Sun Jan 25 00:54:53 2009 +0000
@@ -204,12 +204,18 @@
     (define-key map [menu-bar grep compilation-compile]
       '(menu-item "Compile..." compile
 		  :help "Compile the program including the current buffer.  Default: run `make'"))
+    (define-key map [menu-bar grep compilation-rgrep]
+      '(menu-item "Recursive grep..." rgrep
+		  :help "User-friendly recursive grep in directory tree"))
+    (define-key map [menu-bar grep compilation-lgrep]
+      '(menu-item "Local grep..." lgrep
+		  :help "User-friendly grep in a directory"))
+    (define-key map [menu-bar grep compilation-grep-find]
+      '(menu-item "Grep via Find..." grep-find
+		  :help "Run grep via find, with user-specified args"))
     (define-key map [menu-bar grep compilation-grep]
       '(menu-item "Another grep..." grep
 		  :help "Run grep, with user-specified args, and collect output in a buffer."))
-    (define-key map [menu-bar grep compilation-grep-find]
-      '(menu-item "Recursive grep..." grep-find
-		  :help "Run grep via find, with user-specified args"))
     (define-key map [menu-bar grep compilation-recompile]
       '(menu-item "Repeat grep" recompile
 		  :help "Run grep again"))