mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-24 10:38:38 +00:00
Code Issues Releases Activity

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

Browse Source
This commit is contained in:
Richard M. Stallman 1997-05-02 00:28:21 +00:00
parent 888472e073
commit 662659f092
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lisp/iswitchb.el
View File

@ -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.