[Emacs-diffs] Changes to emacs/lisp/window.el,v

[Martin Rudalics]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Martin Rudalics <m061211>       08/06/06 08:01:00

Index: window.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/window.el,v
retrieving revision 1.136
retrieving revision 1.137
diff -u -b -r1.136 -r1.137
--- window.el   5 Jun 2008 18:00:33 -0000       1.136
+++ window.el   6 Jun 2008 08:00:59 -0000       1.137
@@ -849,6 +849,9 @@
 (defun window--frame-usable-p (frame)
   "Return frame FRAME if it can be used to display another buffer."
   (let ((window (frame-root-window frame)))
+    ;; `frame-root-window' may be an internal window which is considered
+    ;; "dead" by `window-live-p'.  Hence if `window' is not live we
+    ;; implicitly know that `frame' has a visible window we can use.
     (when (or (not (window-live-p window))
              (and (not (window-minibuffer-p window))
                   (not (window-dedicated-p window))))
@@ -1012,8 +1015,7 @@
                (get-largest-window 'visible nil)
                (get-buffer-window buffer 0)
                (get-largest-window 0 nil)
-               (frame-selected-window (funcall pop-up-frame-function))
-               (get-lru-window t t)))
+               (frame-selected-window (funcall pop-up-frame-function))))
       (window--even-window-heights window-to-use)
       (window--display-buffer-2 buffer window-to-use)))))