tim.mccarthy/dotfiles
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Improve how eat semi-char keymaps are modified

Browse Source
This commit is contained in:
Tim McCarthy
2024-09-19 19:29:00 -07:00
parent 998a86c65c
commit ab391624d6
1 changed files with 11 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
thoom-emacs/modules/thoom-eshell.el
View File

@@ -8,13 +8,18 @@
(eval-after-load 'eshell #'eat-eshell-mode) (eval-after-load 'eshell #'eat-eshell-mode)
(eval-after-load 'eshell #'eat-eshell-visual-command-mode) (eval-after-load 'eshell #'eat-eshell-visual-command-mode)
:config :config
(add-to-list 'eat-semi-char-non-bound-keys (vector meta-prefix-char ?`)) (defun advise-eat-keymap (map)
(add-to-list 'eat-semi-char-non-bound-keys [?\C-o]) (define-key map [?\C-o] nil)
(eat-update-semi-char-mode-map) (define-key map (vector meta-prefix-char ?`) nil)
(define-key map [S-v] #'eat-yank))
(add-to-list 'eat-eshell-semi-char-non-bound-keys (vector meta-prefix-char ?`)) (define-advice eat-eshell-semi-char-mode
(add-to-list 'eat-eshell-semi-char-non-bound-keys [?\C-o]) (:after (&rest r))
(eat-eshell-update-semi-char-mode-map) (advise-eat-keymap eat-eshell-semi-char-mode-map))
(define-advice eat-semi-char-mode
(:after (&rest r))
(advise-eat-keymap eat-semi-char-mode-map))
:hook (eat-mode . (lambda () :hook (eat-mode . (lambda ()
(setq display-line-numbers nil) (setq display-line-numbers nil)