diff options
| author | Glenn Morris <rgm@gnu.org> | 2009-10-04 00:41:18 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2009-10-04 00:41:18 +0000 |
| commit | ccafbf06960081e598e17174ab43e29a5e6b4019 (patch) | |
| tree | 0b2b5a02be59ad757f77c8704924b7dffb600810 | |
| parent | 02c6f0980b50c46eef5156062849c3630fec230d (diff) | |
| download | emacs-ccafbf06960081e598e17174ab43e29a5e6b4019.tar.gz | |
(window-full-height-p): Add doc string.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/window.el | 4 |
2 files changed, 8 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 441fd7d47ec..eeb3770db6b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2009-10-04 Glenn Morris <rgm@gnu.org> + + * window.el (window-full-height-p): Add doc string. + 2009-10-04 Martin Rudalics <rudalics@gmx.at> * window.el (window-full-height-p): New function. (Bug#4543) diff --git a/lisp/window.el b/lisp/window.el index 9339247bfa8..c4dc973f94f 100644 --- a/lisp/window.el +++ b/lisp/window.el @@ -87,7 +87,11 @@ return value, use `window-text-height' instead." (if mode-line-format 1 0) (if header-line-format 1 0)))))) +;; See discussion in bug#4543. (defun window-full-height-p (&optional window) + "Return non-nil if WINDOW is not the result of a vertical split. +WINDOW defaults to the selected window. (This function is not +appropriate for minibuffers.)" (unless window (setq window (selected-window))) (= (window-height window) |