[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [contrib] find-dired-by-name
From: |
Richard Stallman |
Subject: |
Re: [contrib] find-dired-by-name |
Date: |
Tue, 13 Nov 2001 21:51:47 -0700 (MST) |
(defun find-dired-by-name(directory pattern)
"Find files in the given directory that match the given pattern."
(interactive
(list
(read-file-name "Find within directory: " nil default-directory)
(read-string "File name pattern (regexp is acceptable): ")))
(find-dired directory (concat "-name " pattern)))
I guess it is ok.