diff options
| author | Richard M. Stallman | 1997-05-02 00:28:21 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-05-02 00:28:21 +0000 |
| commit | 662659f092d37a67a7b9211bdf3c9de32a082ed1 (patch) | |
| tree | d3c0eb9a7ca6af75c62999faf3c68ee9daa80e66 | |
| parent | 888472e07387e88d7b0a1178ca8a338e0e3c3bcb (diff) | |
| download | emacs-662659f092d37a67a7b9211bdf3c9de32a082ed1.tar.gz emacs-662659f092d37a67a7b9211bdf3c9de32a082ed1.zip | |
(iswitchb-entryfn-p): Use memq, not member.
| -rw-r--r-- | lisp/iswitchb.el | 10 |
1 files changed, 5 insertions, 5 deletions
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'." | |||
| 1162 | (defun iswitchb-entryfn-p () | 1162 | (defun iswitchb-entryfn-p () |
| 1163 | "Return non-nil if `this-command' shows we are using `iswitchb-buffer'." | 1163 | "Return non-nil if `this-command' shows we are using `iswitchb-buffer'." |
| 1164 | (and (symbolp this-command) ; ignore lambda functions | 1164 | (and (symbolp this-command) ; ignore lambda functions |
| 1165 | (member (symbol-name this-command) | 1165 | (memq this-command |
| 1166 | '("iswitchb-buffer" | 1166 | '(iswitchb-buffer |
| 1167 | "iswitchb-buffer-other-frame" | 1167 | iswitchb-buffer-other-frame |
| 1168 | "iswitchb-display-buffer" | 1168 | iswitchb-display-buffer |
| 1169 | "iswitchb-buffer-other-window")))) | 1169 | iswitchb-buffer-other-window)))) |
| 1170 | 1170 | ||
| 1171 | (defun iswitchb-summaries-to-end () | 1171 | (defun iswitchb-summaries-to-end () |
| 1172 | "Move the summaries to the end of the list. | 1172 | "Move the summaries to the end of the list. |