From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Stefan Monnier Newsgroups: gmane.emacs.help Subject: Re: elisp question Date: Thu, 01 Dec 2005 16:00:09 -0500 Organization: Bell Sympatico Message-ID: <878xv4o7ps.fsf-monnier+gnu.emacs.help@gnu.org> References: <87iru9qug6.fsf-monnier+gnu.emacs.help@gnu.org> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1133472049 1226 80.91.229.2 (1 Dec 2005 21:20:49 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Thu, 1 Dec 2005 21:20:49 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Thu Dec 01 22:20:45 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1Ehvnd-0004MQ-5l for geh-help-gnu-emacs@m.gmane.org; Thu, 01 Dec 2005 22:17:06 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Ehvnb-00080A-JF for geh-help-gnu-emacs@m.gmane.org; Thu, 01 Dec 2005 16:17:03 -0500 Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!postnews.google.com!news3.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!nf3.bellglobal.com!nf1.bellglobal.com!nf2.bellglobal.com!news20.bellglobal.com.POSTED!not-for-mail Original-Newsgroups: gnu.emacs.help User-Agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) Cancel-Lock: sha1:r6T0lq6E8mohoM0SqcjE5jae3VY= Original-Lines: 21 Original-NNTP-Posting-Host: 67.71.25.91 Original-X-Complaints-To: abuse@sympatico.ca Original-X-Trace: news20.bellglobal.com 1133470809 67.71.25.91 (Thu, 01 Dec 2005 16:00:09 EST) Original-NNTP-Posting-Date: Thu, 01 Dec 2005 16:00:09 EST Original-Xref: shelby.stanford.edu gnu.emacs.help:135981 Original-To: help-gnu-emacs@gnu.org 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:31587 Archived-At: >> (let ((files (directory-files "foo/bar/kaya" 'full "[^.]\\|..."))) >> (pop-to-buffer (find-file-noselect (nth (random (length files)) files)))) > That looks simpler than what I was thinking, although I'll have to go > through it argument by argument to make sure I understand it. I was > expecting to have to count the number of files in the directory, then (length files) counts the number of files. > use that number as the limit to (random), Indeed, that's what it does. > and somehow be able to make (find-files) use the result from (random) as > the name of the file to be read into the buffer. Indeed (nth ... files) selects the randomly chosen file name from the list of file names. Stefan