* riece-handle.el (riece-handle-quit-message): Pass
[riece] / lisp / riece-handle.el
index 628d356..f19f62c 100644 (file)
         (user-identity (riece-make-identity user riece-server-name)))
     ;; If you are talking with the user, quit it.
     (if (riece-identity-member user-identity riece-current-channels)
-       (riece-part-channel user))
+       (riece-part-channel user-identity))
     (setq pointer channels)
     (while pointer
       (riece-naming-assert-part user (car pointer))