From 662659f092d37a67a7b9211bdf3c9de32a082ed1 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 2 May 1997 00:28:21 +0000 Subject: (iswitchb-entryfn-p): Use memq, not member. --- lisp/iswitchb.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'lisp/iswitchb.el') 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. -- cgit v1.2.1