From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: PJ Weisberg Newsgroups: gmane.emacs.devel Subject: Fix for load-dir.el Date: Sun, 28 Aug 2011 12:40:28 -0700 Message-ID: NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 X-Trace: dough.gmane.org 1314560438 22250 80.91.229.12 (28 Aug 2011 19:40:38 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Sun, 28 Aug 2011 19:40:38 +0000 (UTC) To: Emacs-Devel devel Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Sun Aug 28 21:40:34 2011 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1QxlDe-00042E-90 for ged-emacs-devel@m.gmane.org; Sun, 28 Aug 2011 21:40:34 +0200 Original-Received: from localhost ([::1]:36658 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QxlDd-0005ES-Qi for ged-emacs-devel@m.gmane.org; Sun, 28 Aug 2011 15:40:33 -0400 Original-Received: from eggs.gnu.org ([140.186.70.92]:51536) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QxlDb-0005EC-3j for emacs-devel@gnu.org; Sun, 28 Aug 2011 15:40:32 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1QxlDa-0000cX-6T for emacs-devel@gnu.org; Sun, 28 Aug 2011 15:40:31 -0400 Original-Received: from mail-fx0-f41.google.com ([209.85.161.41]:36547) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QxlDZ-0000cT-Pv for emacs-devel@gnu.org; Sun, 28 Aug 2011 15:40:30 -0400 Original-Received: by fxg9 with SMTP id 9so4512078fxg.0 for ; Sun, 28 Aug 2011 12:40:28 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=gamma; h=mime-version:date:message-id:subject:from:to:content-type; bh=7raqUzPjHBC1aRZr1dPw/0iXibwskhp97oueS/L5xBY=; b=SW43px5StOUOxzp5eaWcxDx9hzfYiGHGted2jvro0Vuwh68jz8uaNLuEegmklQWeYo nCfU6XX8ze5+RJSeRAO2Elau8bdisBNT0CYXa/TtBVeS2GTJwtBWN3d90JeoD5KctW8f czVMxbg7yFGntnC1jTvgWh/wk3C4yoaz3k/h4= Original-Received: by 10.223.63.131 with SMTP id b3mr1976681fai.68.1314560428374; Sun, 28 Aug 2011 12:40:28 -0700 (PDT) Original-Received: by 10.223.96.144 with HTTP; Sun, 28 Aug 2011 12:40:28 -0700 (PDT) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-Received-From: 209.85.161.41 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:143612 Archived-At: I noticed that when load-dir-recursive is `t', load-dirs goes into infinite recursion trying to load the directory ".". This trivial patch fixes it. I don't have papers signed (yet), but this hardly constitutes a creative work. Can someone commit it to the elpa branch? --- a/packages/load-dir/load-dir.el +++ b/packages/load-dir/load-dir.el @@ -121,7 +121,7 @@ Recurses into subdirectories if `load-dir-recursive' is t." (add-to-list 'load-dir-loaded f)))) (when load-dir-recursive - (dolist (f (directory-files dir t)) + (dolist (f (directory-files dir t directory-files-no-dot-files-regexp)) (when (file-directory-p f) (load-dir-one f))))))