* liece-commands.el (liece-command-join-channel): User

[elisp/liece.git] / lisp / liece-commands.el

diff --git a/lisp/liece-commands.el b/lisp/liece-commands.el
index e6884a9..2a333f2 100644 (file)
--- a/lisp/liece-commands.el
+++ b/lisp/liece-commands.el
@@ -188,7 +188,7 @@ Optional argument NO-CONS specifies timestamp format is cons cell."
       (setq nick (pop nicks)))
     (when nicks
       (setq join-channel-var
-            (or (car (get (intern (car nick) liece-obarray) 'chnl))
+            (or (car (liece-nick-get-joined-channels (car nick)))
                 join-channel-var)))
     (if (liece-channel-member join-channel-var liece-current-channels)
        (progn