* riece-user.el (riece-user-toggle-channel): Use member instead of
authorueno <ueno>
Fri, 30 May 2003 00:00:43 +0000 (00:00 +0000)
committerueno <ueno>
Fri, 30 May 2003 00:00:43 +0000 (00:00 +0000)
memq.

lisp/riece-user.el

index e584b74..28d061c 100644 (file)
@@ -125,7 +125,7 @@ away status, respectively."
   (let* ((user (riece-get-user (or name (riece-current-nickname))))
         (channels (riece-user-channels user)))
     (if flag
-       (unless (memq channel channels)
+       (unless (member channel channels)
          (riece-user-set-channels user (cons channel channels)))
       (if (setq channel (car (member channel channels)))
          (riece-user-set-channels user (delq channel channels))))))