(quoted-insert-character-offset): Initialize more cleanly.

[gnu-emacs] / lisp / iswitchb.el

diff --git a/lisp/iswitchb.el b/lisp/iswitchb.el
index 7ac80b5642a12850de0ed2220a1e355114cfce04..ddd14e0188d5d448a918e5557ae4078c810f60a0 100644 (file)
--- 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.