* Fix for load-dir.el
@ 2011-08-28 19:40 PJ Weisberg
2011-08-28 21:22 ` Chong Yidong
0 siblings, 1 reply; 2+ messages in thread
From: PJ Weisberg @ 2011-08-28 19:40 UTC (permalink / raw)
To: Emacs-Devel devel
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))))))
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2011-08-28 21:22 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2011-08-28 19:40 Fix for load-dir.el PJ Weisberg
2011-08-28 21:22 ` Chong Yidong
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.