From: Gerd Moellmann <gerd@gnu.org>
Date: Sat, 29 Jan 2000 12:14:55 +0000 (+0000)
Subject: (iswitchb-use-frame-buffer-list): New configuration
X-Git-Tag: emacs-pretest-21.0.90~5200
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f5bd1691b763289fcbd680d421e3d2ed426e6137;p=emacs.git

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

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