Mercurial > emacs
changeset 14707:ddcae263bb18
Make get-buffer-window-list take MINIBUF arg.
author | Simon Marshall <simon@gnu.org> |
---|---|
date | Wed, 28 Feb 1996 09:22:11 +0000 |
parents | e7352445b396 |
children | da278f255507 |
files | lisp/subr.el |
diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/subr.el Wed Feb 28 01:28:42 1996 +0000 +++ b/lisp/subr.el Wed Feb 28 09:22:11 1996 +0000 @@ -698,14 +698,14 @@ On other systems, this variable is normally always nil.") ;; This should probably be written in C (i.e., without using `walk-windows'). -(defun get-buffer-window-list (buffer &optional frame) +(defun get-buffer-window-list (buffer &optional minibuf frame) "Return windows currently displaying BUFFER, or nil if none. -See `get-buffer-window' for the meaning of FRAME." +See `walk-windows' for the meaning of MINIBUF and FRAME." (let ((buffer (if (bufferp buffer) buffer (get-buffer buffer))) windows) (walk-windows (function (lambda (window) (if (eq (window-buffer window) buffer) (setq windows (cons window windows))))) - nil frame) + minibuf frame) windows)) (defun ignore (&rest ignore)