Fixed.
authorDaiki Ueno <ueno@unixuser.org>
Sat, 25 Oct 2003 00:21:54 +0000 (00:21 +0000)
committerDaiki Ueno <ueno@unixuser.org>
Sat, 25 Oct 2003 00:21:54 +0000 (00:21 +0000)
lisp/riece-handle.el

index f683a0a..0e35d5c 100644 (file)
         (user-identity (riece-make-identity user riece-server-name)))
     (while channels
       (riece-naming-assert-join user (car channels))
-      (if riece-gather-channel-modes
+      (if (and riece-gather-channel-modes
+              (riece-identity-equal-no-server user riece-real-nickname))
          (riece-send-string (format "MODE %s\r\n" (car channels))))
       (let* ((channel-identity (riece-make-identity (car channels)
                                                    riece-server-name))