diff options
Diffstat (limited to '.emacs.d/lisp/init-windows.el')
| -rw-r--r-- | .emacs.d/lisp/init-windows.el | 24 |
1 files changed, 7 insertions, 17 deletions
diff --git a/.emacs.d/lisp/init-windows.el b/.emacs.d/lisp/init-windows.el index fcf39cc..15ec232 100644 --- a/.emacs.d/lisp/init-windows.el +++ b/.emacs.d/lisp/init-windows.el @@ -5,11 +5,8 @@ (use-feature emacs :custom (switch-to-buffer-obey-display-actions t) - :config - (defcustom large-frame-width-threshold 500 - "Minimum width (in chars) to consider the frame large." - :group 'djm - :type 'natnum)) + (split-height-threshold nil) + (split-width-threshold 200)) (use-feature ibuffer :bind @@ -22,7 +19,8 @@ ("$" . ibuffer-toggle-filter-group)) :hook (ibuffer-mode . ibuffer-auto-mode)) -(use-package casual-ibuffer +(use-feature casual-ibuffer + :after ibuffer :bind (:map ibuffer-mode-map ("C-o" . casual-ibuffer-tmenu) ("F" . casual-ibuffer-filter-tmenu) @@ -30,6 +28,7 @@ (use-feature winner :defer 5 + :custom (winner-boring-buffers-regexp "\*Minibuf-[0-9]+") :config (winner-mode +1) (defvar winner-repeat-map @@ -66,16 +65,7 @@ (fullframe elpaca-fetch-all quit-window)) (use-package transpose-frame - :bind (:map ctl-x-4-map ("t" . transpose-frame)) - :config - (defun transpose-large-frame () - "Trasnpose the window arrangement, if the frame is large. - -This is based on the frame width, with the threshold being customised using -`large-frame-width-threshold'." - (when (> large-frame-width-threshold (frame-char-width)) (transpose-frame))) - :hook - (cider-connected . transpose-large-frame)) + :bind (:map ctl-x-4-map ("t" . transpose-frame))) (use-package ace-window :diminish @@ -152,7 +142,7 @@ This is based on the frame width, with the threshold being customised using ("P" "[project]" frog-jump-buffer-filter-same-project) ("S" "[similar]" frog-jump-buffer-filter-similar-name))) :bind - ("C-," . frog-jump-buffer) + ("C-c C-," . frog-jump-buffer) ("C-x 4 C-," . frog-jump-buffer-other-window)) (use-package buffer-ring |