Function: balance-windows-area-adjust

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

Signature

(balance-windows-area-adjust WINDOW DELTA HORIZONTAL PIXELWISE)

Documentation

Wrapper around window-resize with error checking.

Arguments WINDOW, DELTA and HORIZONTAL are passed on to that function.

Source Code

;; Defined in /usr/src/emacs/lisp/window.el.gz
(defun balance-windows-area-adjust (window delta horizontal pixelwise)
  "Wrapper around `window-resize' with error checking.
Arguments WINDOW, DELTA and HORIZONTAL are passed on to that function."
  ;; `window-resize' may fail if delta is too large.
  (while (>= (abs delta) 1)
    (condition-case nil
        (progn
	  ;; It was wrong to use `window-resize' here.  Somehow
	  ;; `balance-windows-area' depends on resizing windows
	  ;; asymmetrically.
	  (adjust-window-trailing-edge window delta horizontal pixelwise)
          (setq delta 0))
      (error
       ;;(message "adjust: %s" (error-message-string err))
       (setq delta (/ delta 2))))))