From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 2 May 1997 00:28:21 +0000 (+0000)
Subject: (iswitchb-entryfn-p): Use memq, not member.
X-Git-Tag: emacs-20.1~2326
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=662659f092d37a67a7b9211bdf3c9de32a082ed1;p=emacs.git

(iswitchb-entryfn-p): Use memq, not member.
---

diff --git a/lisp/iswitchb.el b/lisp/iswitchb.el
index 7ac80b5642a..ddd14e0188d 100644
--- a/lisp/iswitchb.el
+++ b/lisp/iswitchb.el
@@ -1162,11 +1162,11 @@ Copied from `icomplete-tidy'."
 (defun iswitchb-entryfn-p ()
   "Return non-nil if `this-command' shows we are using `iswitchb-buffer'."
   (and (symbolp this-command)		; ignore lambda functions
-       (member (symbol-name this-command)
-	       '("iswitchb-buffer"
-		 "iswitchb-buffer-other-frame"
-		 "iswitchb-display-buffer"
-		 "iswitchb-buffer-other-window"))))
+       (memq this-command
+	     '(iswitchb-buffer
+	       iswitchb-buffer-other-frame
+	       iswitchb-display-buffer
+	       iswitchb-buffer-other-window))))
 
 (defun iswitchb-summaries-to-end ()
   "Move the summaries to the end of the list.