From: kaoru <kaoru>
Date: Thu, 17 Feb 2005 16:43:13 +0000 (+0000)
Subject: * riece-addon.el (riece-resolve-addons): Fixed
X-Git-Tag: riece-1_0_8~34
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=ef8410d53c5423f0a798b0b20967aaf5941b198b;p=elisp%2Friece.git

* riece-addon.el (riece-resolve-addons): Fixed
avoid add directory to addons condition.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 260d297..7b7738c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-02-17  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+	* riece-addon.el (riece-resolve-addons): Fixed
+	avoid add directory to addons condition.
+
 2005-02-10  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
 	* riece-addon.el (riece-resolve-addons): Don't add directory to
diff --git a/lisp/riece-addon.el b/lisp/riece-addon.el
index 0a5be0a..092e6a5 100644
--- a/lisp/riece-addon.el
+++ b/lisp/riece-addon.el
@@ -185,7 +185,8 @@
        (append addons
 	       (mapcar
 		(lambda (name)
-		  (unless (file-directory-p 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)))