diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2000-01-29 12:14:55 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2000-01-29 12:14:55 +0000 |
| commit | f5bd1691b763289fcbd680d421e3d2ed426e6137 (patch) | |
| tree | 5ff39c5ec4c3919e67398c189c8fbfe73cf3afad /lisp/iswitchb.el | |
| parent | 887448e1e351834ae38e141e47b7507a689f745e (diff) | |
| download | emacs-f5bd1691b763289fcbd680d421e3d2ed426e6137.tar.gz | |
(iswitchb-use-frame-buffer-list): New configuration
variable. If non-nil, order the buffer list according to the
currently selected frame.
(iswitchb-make-buflist): If iswitchb-use-frame-buffer-list is
non-nil, pass the selected frame to function buffer-list.
Diffstat (limited to 'lisp/iswitchb.el')
| -rw-r--r-- | lisp/iswitchb.el | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/lisp/iswitchb.el b/lisp/iswitchb.el index 18142e6f837..0b5ad730fea 100644 --- a/lisp/iswitchb.el +++ b/lisp/iswitchb.el @@ -295,6 +295,11 @@ See also `iswitchb-newbuffer'." :type 'boolean :group 'iswitchb) +(defcustom iswitchb-use-frame-buffer-list nil + "*Non-nil means use the currently selected frame's buffer list." + :type 'boolean + :group 'iswitchb) + (defcustom iswitchb-make-buflist-hook nil "*Hook to run when list of matching buffers is created." :type 'hook @@ -677,7 +682,8 @@ it is put to the start of the list." (iswitchb-ignore-buffername-p b-name) (memq b-name iswitchb-current-buffers))) b-name))) - (buffer-list))))) + (buffer-list (and iswitchb-use-frame-buffer-list + (selected-frame))))))) (nconc iswitchb-temp-buflist iswitchb-current-buffers) (run-hooks 'iswitchb-make-buflist-hook) ;; Should this be after the hooks, or should the hooks be the |