Commit 02c6f098 authored by Glenn Morris's avatar Glenn Morris

Martin Rudalics <rudalics at gmx.at>

(window-full-height-p): New function.  (Bug#4543)
parent 68972a4f
2009-10-04 Martin Rudalics <rudalics@gmx.at>
* window.el (window-full-height-p): New function. (Bug#4543)
2009-10-03 Chong Yidong <cyd@stupidchicken.com>
* cedet/srecode/insert.el: Require srecode/args.
......
......@@ -87,6 +87,12 @@ return value, use `window-text-height' instead."
(if mode-line-format 1 0)
(if header-line-format 1 0))))))
(defun window-full-height-p (&optional window)
(unless window
(setq window (selected-window)))
(= (window-height window)
(window-height (frame-root-window (window-frame window)))))
(defun one-window-p (&optional nomini all-frames)
"Return non-nil if the selected window is the only window.
Optional arg NOMINI non-nil means don't count the minibuffer
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment