From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Andrea Crotti Newsgroups: gmane.emacs.help Subject: Re: Simple useful function Date: Tue, 06 Jul 2010 13:03:48 +0200 Message-ID: References: <87vd8tk026.fsf@stats.ox.ac.uk> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: dough.gmane.org 1278414290 12236 80.91.229.12 (6 Jul 2010 11:04:50 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Tue, 6 Jul 2010 11:04:50 +0000 (UTC) To: help-gnu-emacs@gnu.org Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Tue Jul 06 13:04:48 2010 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1OW5xH-0006FE-HX for geh-help-gnu-emacs@m.gmane.org; Tue, 06 Jul 2010 13:04:48 +0200 Original-Received: from localhost ([127.0.0.1]:55231 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OW5xF-0005pW-Vl for geh-help-gnu-emacs@m.gmane.org; Tue, 06 Jul 2010 07:04:46 -0400 Original-Received: from [140.186.70.92] (port=50065 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OW5wW-0005o7-QR for help-gnu-emacs@gnu.org; Tue, 06 Jul 2010 07:04:02 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1OW5wV-0008Lp-Kn for help-gnu-emacs@gnu.org; Tue, 06 Jul 2010 07:04:00 -0400 Original-Received: from lo.gmane.org ([80.91.229.12]:41365) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OW5wV-0008LY-Fu for help-gnu-emacs@gnu.org; Tue, 06 Jul 2010 07:03:59 -0400 Original-Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1OW5wT-0005qI-Id for help-gnu-emacs@gnu.org; Tue, 06 Jul 2010 13:03:57 +0200 Original-Received: from 65-070.eduroam.rwth-aachen.de ([134.61.65.70]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Tue, 06 Jul 2010 13:03:57 +0200 Original-Received: from andrea.crotti.0 by 65-070.eduroam.rwth-aachen.de with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Tue, 06 Jul 2010 13:03:57 +0200 X-Injected-Via-Gmane: http://gmane.org/ Original-Lines: 37 Original-X-Complaints-To: usenet@dough.gmane.org X-Gmane-NNTP-Posting-Host: 65-070.eduroam.rwth-aachen.de User-Agent: Gnus/5.110011 (No Gnus v0.11) Emacs/23.2 (darwin) Cancel-Lock: sha1:Gnr1BODNRP1ra61qDl4UFddQOGQ= X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:74095 Archived-At: "Drew Adams" writes: > > If you have an Emacs function that returns those file names (absolute or > relative), then you can open a Dired buffer for just those files. > > You do that by calling `dired' with a cons arg: the list of file names. If the > files are not all in the same directory, then use absolute names. For example: > > (dired "My GIT Files" '("/my/first/file" "/my/2nd/file"...)) > > `C-h f dired': Very nice, I simply did something like: --8<---------------cut here---------------start------------->8--- (defun open-git-files () "Visit all the files in the current git project" (interactive) (dolist (file (ls-git-files)) (message "Opening %s" file) ;; we have to keep the original position (save-excursion (find-file file)))) (defun dired-git-files () (interactive) (dired (ls-git-files))) (defun ls-git-files () (if (file-exists-p ".git") (split-string (shell-command-to-string "git ls-files")) (message "not a git repo"))) --8<---------------cut here---------------end--------------->8--- Any improvement is welcome ;) Does ls-git-files "returns" nil automatically if ".git" is not found?