Install avy and ace-window

And make the M-o shortcut work in eat (it was captured in
semi-char-mode).

Note: When changing the eat-semi-char-non-bound-keys variable, you
need to call eat-update-semi-char-mode-map afterward, and eat-reload
to make sure that the changes are taken into account.
This commit is contained in:
Dimitri Lozeve 2024-06-07 17:33:32 +02:00
parent 78482d629f
commit 4e12e57fa2

21
init.el
View file

@ -114,7 +114,7 @@
(let ((fill-column (point-max))) (let ((fill-column (point-max)))
(fill-region (region-beginning) (region-end) nil))) (fill-region (region-beginning) (region-end) nil)))
:bind (("M-o" . other-window) :bind (;; ("M-o" . other-window) ;; Replaced with ace-window
([remap buffer-menu] . ibuffer) ([remap buffer-menu] . ibuffer)
([remap count-words-region] . count-words) ([remap count-words-region] . count-words)
([remap just-one-space] . cycle-spacing) ([remap just-one-space] . cycle-spacing)
@ -282,6 +282,16 @@
(setq tab-always-indent 'complete) (setq tab-always-indent 'complete)
(global-corfu-mode)) (global-corfu-mode))
(use-package ace-window
:straight t
:bind (("M-o" . ace-window)))
(use-package avy
:straight t
:config (avy-setup-default)
:bind (("M-j" . avy-goto-char-timer)
("C-c C-j" . avy-resume)))
(use-package vundo (use-package vundo
:straight t :straight t
:config :config
@ -1015,9 +1025,14 @@
("terminfo/65" "terminfo/65/*") ("terminfo/65" "terminfo/65/*")
("integration" "integration/*") ("integration" "integration/*")
(:exclude ".dir-locals.el" "*-tests.el"))) (:exclude ".dir-locals.el" "*-tests.el")))
:bind (("C-x RET RET" . eat-other-window)
("C-x p RET" . eat-project-other-window))
:config :config
(global-set-key (kbd "C-x RET RET") 'eat-other-window) ;; Enable M-o in semi-char-mode
(global-set-key (kbd "C-x p RET") 'eat-project-other-window) (add-to-list 'eat-semi-char-non-bound-keys [?\e ?o])
(eat-update-semi-char-mode-map)
(eat-reload)
;; Appearance
(setq eat-enable-shell-prompt-annotation nil) (setq eat-enable-shell-prompt-annotation nil)
(setopt eat-very-visible-cursor-type '(t nil nil)) (setopt eat-very-visible-cursor-type '(t nil nil))
(setopt eat-default-cursor-type '(t nil nil)) (setopt eat-default-cursor-type '(t nil nil))