Mercurial > emacs
changeset 39172:9ba7895e6ad2
(get-window-with-predicate): Renamed from some-window.
(some-window): Make it an alias.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Fri, 07 Sep 2001 11:29:48 +0000 |
| parents | 9955e741f70f |
| children | afcda06e306e |
| files | lisp/window.el |
| diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/window.el Fri Sep 07 11:19:02 2001 +0000 +++ b/lisp/window.el Fri Sep 07 11:29:48 2001 +0000 @@ -84,7 +84,8 @@ (cons walk-windows-current walk-windows-already-seen)) (funcall proc walk-windows-current))))) -(defun some-window (predicate &optional minibuf all-frames default) +(defun get-window-with-predicate (predicate &optional minibuf + all-frames default) "Return a window satisfying PREDICATE. This function cycles through all visible windows using `walk-windows', @@ -119,6 +120,8 @@ minibuf all-frames) default)) +(defalias 'some-window 'get-window-with-predicate) + (defun minibuffer-window-active-p (window) "Return t if WINDOW (a minibuffer window) is now active." (eq window (active-minibuffer-window)))