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

Martin Rudalics <rudalics at>

(window-full-height-p): New function.  (Bug#4543)
parent 68972a4f
2009-10-04 Martin Rudalics <>
* window.el (window-full-height-p): New function. (Bug#4543)
2009-10-03 Chong Yidong <>
* 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