From: ueno <ueno>
Date: Fri, 30 May 2003 00:00:43 +0000 (+0000)
Subject: * riece-user.el (riece-user-toggle-channel): Use member instead of
X-Git-Tag: riece-0_0_2~14
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=1e3ca038f28af0a3ff1176a330ed7f964f2ec799;p=elisp%2Friece.git

* 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))))))