Add riece-button.el and riece-keyword.el.

[riece] / lisp / riece-000.el

diff --git a/lisp/riece-000.el b/lisp/riece-000.el
index 2f7c713..2900106 100644 (file)
--- a/lisp/riece-000.el
+++ b/lisp/riece-000.el
@@ -27,6 +27,7 @@
 (require 'riece-misc)
 (require 'riece-filter)                        ;riece-default-handle-message
 (require 'riece-version)
+(require 'riece-commands)              ;riece-command-join
 
 (eval-when-compile
   (autoload 'riece-default-handle-numeric-reply "riece-filter"))
@@ -52,9 +53,9 @@
   (let ((channel-list riece-startup-channel-list))
     (while channel-list
       (if (listp (car channel-list))
-         (riece-command-join (car (car channel-list))
+         (riece-command-join (riece-parse-identity (car (car channel-list)))
                              (nth 1 (car channel-list)))
-       (riece-command-join (car channel-list)))
+       (riece-command-join (riece-parse-identity (car channel-list))))
       (setq channel-list (cdr channel-list))))
   (run-hooks 'riece-after-login-hook))