From: Daiki Ueno <ueno@unixuser.org>
Date: Fri, 30 May 2003 00:00:43 +0000 (+0000)
Subject: * riece-user.el (riece-user-toggle-channel): Use member instead of
X-Git-Url: http://cgit.sxemacs.org/?p=riece;a=commitdiff_plain;h=5080d33d117e57033d5e57d46d6f63625f146738

* riece-user.el (riece-user-toggle-channel): Use member instead of
memq.
---

diff --git a/lisp/riece-user.el b/lisp/riece-user.el
index e584b74..28d061c 100644
--- a/lisp/riece-user.el
+++ b/lisp/riece-user.el
@@ -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))))))