Mercurial > emacs
changeset 44847:f19c8ff457df
(find-name-dired): Don't quote pattern twice.
| author | Andreas Schwab <schwab@suse.de> |
|---|---|
| date | Thu, 25 Apr 2002 16:30:36 +0000 |
| parents | b8dcb8b4ef63 |
| children | c1038e3c47bd |
| files | lisp/find-dired.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/find-dired.el Thu Apr 25 15:44:24 2002 +0000 +++ b/lisp/find-dired.el Thu Apr 25 16:30:36 2002 +0000 @@ -1,6 +1,6 @@ ;;; find-dired.el --- run a `find' command and dired the output -;; Copyright (C) 1992, 1994, 1995, 2000 Free Software Foundation, Inc. +;; Copyright (C) 1992, 1994, 1995, 2000, 2002 Free Software Foundation, Inc. ;; Author: Roland McGrath <roland@gnu.org>, ;; Sebastian Kremer <sk@thp.uni-koeln.de> @@ -159,7 +159,7 @@ find . -name 'PATTERN' -ls" (interactive "DFind-name (directory): \nsFind-name (filename wildcard): ") - (find-dired dir (concat "-name '" (shell-quote-argument pattern) "'"))) + (find-dired dir (concat "-name " (shell-quote-argument pattern)))) ;; This functionality suggested by ;; From: oblanc@watcgl.waterloo.edu (Olivier Blanc)