Mercurial > emacs

comparison lisp/window.el @ 99697:4d2232791f45

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(window--frame-usable-p): Consider dedicated windows as usable.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Tue, 18 Nov 2008 20:45:21 +0000
parents 75d942e6450e
children a02dc0440746
comparison
equal deleted inserted replaced
99696:9977c453ce75 99697:4d2232791f45
870 ;; "dead" by `window-live-p'. Hence if `window' is not live we 870 ;; "dead" by `window-live-p'. Hence if `window' is not live we
871 ;; implicitly know that `frame' has a visible window we can use. 871 ;; implicitly know that `frame' has a visible window we can use.
872 (unless (and (window-live-p window) 872 (unless (and (window-live-p window)
873 (or (window-minibuffer-p window) 873 (or (window-minibuffer-p window)
874 ;; If the window is soft-dedicated, the frame is usable. 874 ;; If the window is soft-dedicated, the frame is usable.
875 (eq t (window-dedicated-p window)))) 875 ;; Actually, even if the window is really dedicated,
876 ;; the frame is still usable by splitting it.
877 ;; At least Emacs-22 allowed it, and it is desirable
878 ;; when displaying same-frame windows.
879 nil ; (eq t (window-dedicated-p window))
880 ))
876 frame)))) 881 frame))))
877 882
878 (defcustom even-window-heights t 883 (defcustom even-window-heights t
879 "If non-nil `display-buffer' will try to even window heights. 884 "If non-nil `display-buffer' will try to even window heights.
880 Otherwise `display-buffer' will leave the window configuration 885 Otherwise `display-buffer' will leave the window configuration