From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Newsgroups: gmane.emacs.help Subject: Re: filter from find-dired Date: Mon, 14 Jan 2013 17:26:50 +0000 (GMT) Message-ID: <23721201.139161358184410041.JavaMail.defaultUser@defaultHost> Reply-To: r_mercado@o2.co.uk NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain;charset="UTF-8" Content-Transfer-Encoding: 7bit X-Trace: ger.gmane.org 1358184430 3395 80.91.229.3 (14 Jan 2013 17:27:10 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Mon, 14 Jan 2013 17:27:10 +0000 (UTC) To: , Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Mon Jan 14 18:27:28 2013 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1Tunok-0003JQ-Od for geh-help-gnu-emacs@m.gmane.org; Mon, 14 Jan 2013 18:27:26 +0100 Original-Received: from localhost ([::1]:55088 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1TunoU-00055v-Gg for geh-help-gnu-emacs@m.gmane.org; Mon, 14 Jan 2013 12:27:10 -0500 Original-Received: from eggs.gnu.org ([208.118.235.92]:35224) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1TunoG-00053S-Jd for help-gnu-emacs@gnu.org; Mon, 14 Jan 2013 12:27:05 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1TunoB-0002av-Hg for help-gnu-emacs@gnu.org; Mon, 14 Jan 2013 12:26:56 -0500 Original-Received: from vader.london.02.net ([82.132.130.150]:57016 helo=mail.o2.co.uk) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1TunoB-0002aj-9b for help-gnu-emacs@gnu.org; Mon, 14 Jan 2013 12:26:51 -0500 Original-Received: from fangio (82.132.130.218) by mail.o2.co.uk (8.5.140.03) (authenticated as r_mercado) id 50D6EDD2069AC94F; Mon, 14 Jan 2013 17:26:50 +0000 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Received-From: 82.132.130.150 X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:88610 Archived-At: Hi again, get-directory-name is my function too. Glad to receive suggestions on how to improve it. (defun get-directory-name () "return the current directory" (interactive) (let (dirname components) (if (null (buffer-file-name (current-buffer))) (setq dirname (expand-file-name default-directory)) (setq components (butlast (split-string (get-file-name) "/"))) (setq dirname (mapconcat 'identity components "/")) ) (message dirname) (kill-new dirname) dirname) ) ----Original Message---- From: r_mercado@o2.co.uk Date: Jan 14, 2013 16:28 To: Subject: filter from find-dired Hello I created a helper interactive function for my work that searches files from the current directory that match the name "*subst*". (defun find-substitutions () "find substitution files in the current directory" (interactive) (find-name-dired (get-directory-name) "*substitutions*") ) I would like to filter the entries that sit under a .svn directory How would I go about it? In "plain" find, I found this works find . -name .svn -prune -o -name "*subst*" -print find-dired with the same parameters does not filter the entries under .svn, instead it includes all .svn directories Thanks