[Emacs-diffs] /srv/bzr/emacs/trunk r105661: * lisp/progmodes/grep.el (rgrep): Add "-type d".

[Juri Linkov]

------------------------------------------------------------
revno: 105661
fixes bug(s): http://debbugs.gnu.org/9414
author: Oleksandr Gavenko <address@hidden>
committer: Juri Linkov <address@hidden>
branch nick: trunk
timestamp: Mon 2011-09-05 12:55:11 +0300
message:
  * lisp/progmodes/grep.el (rgrep): Add "-type d".
modified:
  lisp/ChangeLog
  lisp/progmodes/grep.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-09-05 09:48:26 +0000
+++ b/lisp/ChangeLog    2011-09-05 09:55:11 +0000
@@ -1,3 +1,7 @@
+2011-09-05  Oleksandr Gavenko  <address@hidden>  (tiny change)
+
+       * progmodes/grep.el (rgrep): Add "-type d" (bug#9414).
+
 2011-09-05  Juri Linkov  <address@hidden>
 
        * progmodes/grep.el (grep-process-setup): Fix comments (bug#8084).

=== modified file 'lisp/progmodes/grep.el'
--- a/lisp/progmodes/grep.el    2011-09-05 09:48:26 +0000
+++ b/lisp/progmodes/grep.el    2011-09-05 09:55:11 +0000
@@ -989,7 +989,8 @@
                      dir
                      (concat
                       (and grep-find-ignored-directories
-                           (concat (shell-quote-argument "(")
+                           (concat "-type d "
+                                   (shell-quote-argument "(")
                                    ;; we should use shell-quote-argument here
                                    " -path "
                                    (mapconcat