* riece-highlight.el (riece-highlight-uninstall): Use
[riece] / lisp / riece-000.el
index a986907..4506392 100644 (file)
 ;;; Code:
 
 (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"))
+  (autoload 'riece-default-handle-numeric-reply "riece-handle"))
 (defun riece-handle-default-000-message (prefix number name string)
   (setq riece-nick-accepted 'ok)
   (riece-default-handle-numeric-reply
@@ -61,7 +60,7 @@
       (if (equal (riece-identity-server
                  (setq identity (riece-parse-identity (car entry))))
                 riece-server-name)
-         (riece-command-join identity (nth 1 entry)))
+         (riece-command-join-channel identity (nth 1 entry)))
       (setq channel-list (cdr channel-list))))
   (run-hooks 'riece-after-login-hook))