# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 862532901 0
# Node ID c8e876b73dcd80cb2f952479f42bd3b19400c474
# Parent  8d33666b115207ec1fad17264a79455a24a98df7
(iswitchb-entryfn-p): Use memq, not member.

diff -r 8d33666b1152 -r c8e876b73dcd lisp/iswitchb.el
--- a/lisp/iswitchb.el	Fri May 02 00:25:25 1997 +0000
+++ b/lisp/iswitchb.el	Fri May 02 00:28:21 1997 +0000
@@ -1162,11 +1162,11 @@
 (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.