X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/0bafabe7b28b6ee05cf052579e398102fd73e0eb..c1ff88c0ce3bf79ed0c6bf914b6a33a8c37173d6:/lisp/find-dired.el diff --git a/lisp/find-dired.el b/lisp/find-dired.el index f9a0c015bf..0dc98dee58 100644 --- a/lisp/find-dired.el +++ b/lisp/find-dired.el @@ -1,11 +1,11 @@ ;;; find-dired.el --- run a `find' command and dired the output -;; Copyright (C) 1992, 1994-1995, 2000-2013 Free Software Foundation, +;; Copyright (C) 1992, 1994-1995, 2000-2015 Free Software Foundation, ;; Inc. ;; Author: Roland McGrath , ;; Sebastian Kremer -;; Maintainer: FSF +;; Maintainer: emacs-devel@gnu.org ;; Keywords: unix ;; This file is part of GNU Emacs. @@ -30,7 +30,7 @@ (require 'dired) (defgroup find-dired nil - "Run a `find' command and dired the output." + "Run a `find' command and Dired the output." :group 'dired :prefix "find-") @@ -234,11 +234,13 @@ use in place of \"-ls\" as the final argument." ;;;###autoload (defun find-name-dired (dir pattern) "Search DIR recursively for files matching the globbing pattern PATTERN, -and run dired on those files. +and run Dired on those files. PATTERN is a shell wildcard (not an Emacs regexp) and need not be quoted. -The command run (after changing into DIR) is +The default command run (after changing into DIR) is + + find . -name 'PATTERN' -ls - find . -name 'PATTERN' -ls" +See `find-name-arg' to customize the arguments." (interactive "DFind-name (directory): \nsFind-name (filename wildcard): ") (find-dired dir (concat find-name-arg " " (shell-quote-argument pattern)))) @@ -252,7 +254,7 @@ The command run (after changing into DIR) is (defalias 'lookfor-dired 'find-grep-dired) ;;;###autoload (defun find-grep-dired (dir regexp) - "Find files in DIR containing a regexp REGEXP and start Dired on output. + "Find files in DIR matching a regexp REGEXP and start Dired on output. The command run (after changing into DIR) is find . \\( -type f -exec `grep-program' `find-grep-options' \\