Lines Matching refs:wt
273 (wt (car (window-tree frame))))
276 (bw-find-tree-sub-1 wt window get-parent)
277 wt))))
379 (wt (bw-get-tree window-or-frame))
386 (when wt
392 (when (eq 'hor (bw-dir wt))
393 (setq w (- (bw-r wt) (bw-l wt))))
394 (when (eq 'ver (bw-dir wt))
395 (setq h (- (bw-b wt) (bw-t wt))))
396 (bw-balance-sub wt w h)))))
407 (defun bw-balance-sub (wt w h)
408 (setq wt (bw-refresh-edges wt))
409 (unless w (setq w (- (bw-r wt) (bw-l wt))))
410 (unless h (setq h (- (bw-b wt) (bw-t wt))))
411 (if (windowp wt)
414 (let ((dw (- w (- (bw-r wt) (bw-l wt)))))
416 (bw-adjust-window wt dw t))))
418 (let ((dh (- h (- (bw-b wt) (bw-t wt)))))
420 (bw-adjust-window wt dh nil)))))
421 (let* ((childs (cdr (assq 'childs wt)))
423 (cw (when w (/ w (if (bw-eqdir 'hor wt) (length childs) 1))))
424 (ch (when h (/ h (if (bw-eqdir 'ver wt) (length childs) 1)))))