working on bindings

This commit is contained in:
Matt Nish-Lapidus 2025-05-19 23:47:06 -04:00
parent 8f96b3f79c
commit 9ed9cc2180
2 changed files with 4 additions and 1 deletions

View file

@ -357,6 +357,7 @@
"C-M-j" #'next-window-any-frame "C-M-j" #'next-window-any-frame
"C-M-k" #'previous-window-any-frame "C-M-k" #'previous-window-any-frame
"C-M-l" #'centaur-tabs-forward "C-M-l" #'centaur-tabs-forward
"C-^" #'cua-exchange-point-and-mark ; to make this acessible as a meow bind it needed a new base keybind
"M-x" #'execute-extended-command "M-x" #'execute-extended-command
"<home>" #'beginning-of-buffer "<home>" #'beginning-of-buffer
"<end>" #'end-of-buffer "<end>" #'end-of-buffer

View file

@ -16,7 +16,8 @@
(meow--select (not isearch-forward))))))) (meow--select (not isearch-forward)))))))
(setf meow--kbd-forward-char "<right>" (setf meow--kbd-forward-char "<right>"
meow--kbd-undo "C-z") meow--kbd-undo "C-z"
meow--kbd-exchange-point-and-mark "C-^")
(add-hook 'isearch-mode-end-hook 'meow--post-isearch-function) (add-hook 'isearch-mode-end-hook 'meow--post-isearch-function)
@ -73,6 +74,7 @@
'("l" . meow-right) '("l" . meow-right)
'("L" . meow-right-expand) '("L" . meow-right-expand)
'("m" . meow-join) '("m" . meow-join)
'("M" . meow-pop-or-unpop-to-mark)
'("n" . meow-search) '("n" . meow-search)
'("o" . meow-block) '("o" . meow-block)
'("O" . meow-to-block) '("O" . meow-to-block)