From 0b5e320d07f841d6eab9225cd1eac672ee70ecdc Mon Sep 17 00:00:00 2001 From: jao Date: Sat, 10 Sep 2022 22:04:17 +0100 Subject: jao-afio: jao-trisect belongs there --- init.el | 17 +---------------- 1 file changed, 1 insertion(+), 16 deletions(-) (limited to 'init.el') diff --git a/init.el b/init.el index 6c295f0..d5883d1 100644 --- a/init.el +++ b/init.el @@ -1255,22 +1255,7 @@ (use-package tool-bar) (tool-bar-mode -1) -(defun jao-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)))))) +(defalias 'jao-trisect 'jao-afio-trisect) (defun jao-bisect () (interactive) -- cgit v1.2.3