diff options
| author | Wolfgang Jenkner | 2012-04-11 13:39:35 +0200 |
|---|---|---|
| committer | Lars Magne Ingebrigtsen | 2012-04-11 13:39:35 +0200 |
| commit | 49a2697c1ed851de2e93ee3ba12ab74f286f9634 (patch) | |
| tree | 2eb6ae6daacaf5076d66911d249eee68637ab9f2 | |
| parent | f867f9971dff3ea37fb8a5d369341d65522694ff (diff) | |
| download | emacs-49a2697c1ed851de2e93ee3ba12ab74f286f9634.tar.gz emacs-49a2697c1ed851de2e93ee3ba12ab74f286f9634.zip | |
rgrep ignored file tweak
* lisp/progmodes/grep.el (rgrep): Tweak the find command line so
that directories matching `grep-find-ignored-files' won't be
pruned.
Fixes: debbugs:10351
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/progmodes/grep.el | 3 |
2 files changed, 8 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 205d6d0be99..a3a633c86fe 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2011-12-20 Wolfgang Jenkner <wjenkner@inode.at> | ||
| 2 | |||
| 3 | * lisp/progmodes/grep.el (rgrep): Tweak the find command line so | ||
| 4 | that directories matching `grep-find-ignored-files' won't be | ||
| 5 | pruned (bug#10351). | ||
| 6 | |||
| 1 | 2012-04-11 Chong Yidong <cyd@gnu.org> | 7 | 2012-04-11 Chong Yidong <cyd@gnu.org> |
| 2 | 8 | ||
| 3 | * startup.el (command-line): Remove support for long-obsolete | 9 | * startup.el (command-line): Remove support for long-obsolete |
diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el index d41364547f2..569e864a1c6 100644 --- a/lisp/progmodes/grep.el +++ b/lisp/progmodes/grep.el | |||
| @@ -1024,7 +1024,8 @@ to specify a command to run." | |||
| 1024 | (shell-quote-argument ")") | 1024 | (shell-quote-argument ")") |
| 1025 | " -prune -o ")) | 1025 | " -prune -o ")) |
| 1026 | (and grep-find-ignored-files | 1026 | (and grep-find-ignored-files |
| 1027 | (concat (shell-quote-argument "(") | 1027 | (concat (shell-quote-argument "!") " -type d " |
| 1028 | (shell-quote-argument "(") | ||
| 1028 | ;; we should use shell-quote-argument here | 1029 | ;; we should use shell-quote-argument here |
| 1029 | " -name " | 1030 | " -name " |
| 1030 | (mapconcat | 1031 | (mapconcat |