diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/eos/jao-afio.el | 20 |
1 files changed, 19 insertions, 1 deletions
diff --git a/lib/eos/jao-afio.el b/lib/eos/jao-afio.el index 6369697..be25d65 100644 --- a/lib/eos/jao-afio.el +++ b/lib/eos/jao-afio.el @@ -48,6 +48,24 @@ (unless (jao-afio--current-config) (jao-afio--init (window-frame (get-buffer-window (current-buffer)))))) +;;; utilities +(defun jao-afio-trisect (&optional force) + (interactive) + (let ((fw (frame-width))) + (cond ((or force (>= fw 240)) + (let ((b (current-buffer))) + (delete-other-windows) + (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)))))) + ;;; session openers ;;;###autoload (defun jao-afio-open-pdf-session (&optional docs) @@ -152,7 +170,7 @@ (?w (jao-afio-open-www)) (?g (jao-afio-open-mail)) (?p (jao-afio-open-doc)) - (?s (delete-other-windows)))) + (?s (jao-afio-trisect)))) ;;; go to frame (defsubst jao-afio--find-frame (c) |