From ef8410d53c5423f0a798b0b20967aaf5941b198b Mon Sep 17 00:00:00 2001 From: kaoru Date: Thu, 17 Feb 2005 16:43:13 +0000 Subject: [PATCH] * riece-addon.el (riece-resolve-addons): Fixed avoid add directory to addons condition. --- lisp/ChangeLog | 5 +++++ lisp/riece-addon.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) 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 + + * riece-addon.el (riece-resolve-addons): Fixed + avoid add directory to addons condition. + 2005-02-10 TAKAHASHI Kaoru * 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))) -- 1.7.10.4