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 00:07:57 -0500 Organization: Bell Sympatico Message-ID: <87iru9qug6.fsf-monnier+gnu.emacs.help@gnu.org> References: NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1133414791 13769 80.91.229.2 (1 Dec 2005 05:26:31 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Thu, 1 Dec 2005 05:26:31 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Thu Dec 01 06:26:29 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1Ehgwf-0007gh-3g for geh-help-gnu-emacs@m.gmane.org; Thu, 01 Dec 2005 06:25:25 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Ehgwe-0004hZ-8V for geh-help-gnu-emacs@m.gmane.org; Thu, 01 Dec 2005 00:25:24 -0500 Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!bloom-beacon.mit.edu!4.24.21.218.MISMATCH!newsfeed2.dallas1.level3.net!news.level3.com!postnews.google.com!news3.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!wns13feed!worldnet.att.net!207.35.177.252!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:PgazC4hpwzSDpWDLunOz7pVjTwA= Original-Lines: 23 Original-NNTP-Posting-Host: 67.71.25.91 Original-X-Complaints-To: abuse@sympatico.ca Original-X-Trace: news20.bellglobal.com 1133413677 67.71.25.91 (Thu, 01 Dec 2005 00:07:57 EST) Original-NNTP-Posting-Date: Thu, 01 Dec 2005 00:07:57 EST Original-Xref: shelby.stanford.edu gnu.emacs.help:135950 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:31557 Archived-At: > The files are in a subdirectory (called kaya), numbered 1 to whatever, > so I want to randomly pick an integer from 1 to whatever. I thought > that (find-file) or perhaps (find-file-noselect) could be used in > conjunction with (random), but I can't figure out how to do that. > I've probably missed someting really bloody obvious in the elisp > manual... (pop-to-buffer (find-file-noselect (expand-file-name (number-to-string (random N)) "foo/bar/kaya"))) This assumes the file names go from 0 to N-1. You could also do (let ((files (directory-files "foo/bar/kaya" 'full "[^.]\\|..."))) (pop-to-buffer (find-file-noselect (nth (random (length files)) files)))) and just select any random file in the directory, without any assumption on the file names used. Stefan