Function: balance-windows-1

balance-windows-1 is a byte-compiled function defined in window.el.gz.

Signature

(balance-windows-1 WINDOW &optional HORIZONTAL)

Documentation

Subroutine of balance-windows.

Source Code

;; Defined in /usr/src/emacs/lisp/window.el.gz
(defun balance-windows-1 (window &optional horizontal)
  "Subroutine of `balance-windows'."
  (if (window-child window)
      (let ((sub (window-child window)))
	(if (window-combined-p sub horizontal)
	    (balance-windows-2 window horizontal)
	  (let ((size (window-new-pixel window)))
	    (while sub
	      (set-window-new-pixel sub size)
	      (balance-windows-1 sub horizontal)
	      (setq sub (window-right sub))))))))