* riece-layout.el (riece-set-window-points): Move point in

[riece] / lisp / riece-000.el

diff --git a/lisp/riece-000.el b/lisp/riece-000.el
index 1b2abbe..12e2d37 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"))
@@ -42,6 +43,9 @@
   (setq riece-real-server-name prefix
        riece-real-nickname name
        riece-real-userhost nil)
+  ;; Before sending USERHOST, register myself with riece-obarray
+  ;; because it may take some time.
+  (riece-get-user name)
   (riece-send-string (format "USERHOST %s\r\n" riece-real-nickname))
   (riece-insert-info
    (list riece-dialogue-buffer riece-others-buffer)