eriedaberrie/.emacs.d
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Use more default ace-window

Browse source 
I am no longer using evil/meow so the default keys make more sense I guess
This commit is contained in:
eriedaberrie 2023-12-14 17:32:40 -08:00
parent 566ae9da48
commit d0e5e85867
1 changed files with 2 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
init.el
View file

@ -109,7 +109,7 @@
:bind :bind
("C-S-c" . mc/edit-lines) ("C-S-c" . mc/edit-lines)
("C->" . mc/mark-next-like-this) ("C->" . mc/mark-next-like-this)
("C-<" . mc/mark-prev-like-this) ("C-<" . mc/mark-previous-like-this)
("C-+" . mc/mark-all-like-this) ("C-+" . mc/mark-all-like-this)
("C-|" . mc/mark-pop) ("C-|" . mc/mark-pop)
("C-c c" . mc/mark-all-in-region) ("C-c c" . mc/mark-all-in-region)
@ -161,15 +161,10 @@
(use-package ace-window (use-package ace-window
:bind ("C-c w" . ace-window) :bind ("C-c w" . ace-window)
:custom :custom
(aw-keys '(?a ?w ?e ?r ?g ?h ?j ?k ?l ?p))
(aw-dispatch-always t) (aw-dispatch-always t)
(aw-scope 'frame) (aw-scope 'frame)
(aw-keys '(?a ?w ?d ?f ?g ?h ?k ?l))
:config :config
(dolist (c aw-dispatch-alist)
(cl-case (car c)
(?j (setcar c ?J))
(?v (setcar c ?s) (setcar (nthcdr 2 c) "Split Window"))
(?b (setcar c ?v) (setcar (nthcdr 2 c) "Vertical Split"))))
(with-eval-after-load 'catppuccin-theme (with-eval-after-load 'catppuccin-theme
(face-spec-set 'aw-leading-char-face `((t (:foreground (face-spec-set 'aw-leading-char-face `((t (:foreground
,(catppuccin-get-color 'crust) ,(catppuccin-get-color 'crust)