X-Git-Url: http://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-addon.el;h=092e6a50cbcdcea8ceea56dd1d28148a68dd948f;hp=866c26189f1d5370668971da02b547ab29e53822;hb=d20c5d20593cd54b19216c2124a6dae9fbc088e7;hpb=9813a6f38fd73e13df920134f25109940917d27c

diff --git a/lisp/riece-addon.el b/lisp/riece-addon.el
index 866c261..092e6a5 100644
--- a/lisp/riece-addon.el
+++ b/lisp/riece-addon.el
@@ -181,11 +181,15 @@
 
 (defun riece-resolve-addons (addons)
   (riece-resolve-addon-dependencies
-   (append addons
-	   (mapcar
-	    (lambda (name)
-	      (intern (file-name-sans-extension name)))
-	    (directory-files riece-addon-directory nil "\\`[^.]" t t)))))
+   (if (file-directory-p riece-addon-directory)
+       (append addons
+	       (mapcar
+		(lambda (name)
+		  (unless (file-directory-p
+			   (expand-file-name name riece-addon-directory))
+		    (intern (file-name-sans-extension name))))
+		(directory-files riece-addon-directory nil "\\`[^.]" t)))
+     addons)))
 
 (defun riece-insinuate-addon (addon &optional verbose)
   (require addon)		;implicit dependency