diff options
| -rw-r--r-- | init.el | 11 |
1 files changed, 7 insertions, 4 deletions
@@ -1347,14 +1347,17 @@ (defun jao-trisect (&optional force) (interactive) (let ((fw (frame-width))) - (delete-other-windows) (cond ((or force (>= fw 240)) - (let ((w (- (/ fw 3)))) + (let ((b (current-buffer))) (delete-other-windows) - (split-window-horizontally w) - (split-window-horizontally w) + (switch-to-buffer (other-buffer b)) + (split-window-horizontally) + (switch-to-buffer (other-buffer b)) + (split-window-horizontally) + (switch-to-buffer b) (balance-windows))) ((> fw 162) + (delete-other-windows) (split-window-horizontally) (switch-to-buffer (other-buffer)))))) |