fixing keybinds

This commit is contained in:
Matt Nish-Lapidus 2025-05-19 10:25:43 -04:00
parent d9eccc80e9
commit ad73bd91f9
5 changed files with 24 additions and 35 deletions

View file

@ -124,6 +124,7 @@
:desc "Repeat last command" "C" #'projectile-repeat-last-command :desc "Repeat last command" "C" #'projectile-repeat-last-command
:desc "Remove known project" "d" #'projectile-remove-known-project :desc "Remove known project" "d" #'projectile-remove-known-project
:desc "Discover projects in folder" "D" #'+default/discover-projects :desc "Discover projects in folder" "D" #'+default/discover-projects
:desc "Cleanup project cache" "I" #'projectile-cleanup-known-projects
:desc "Edit project .dir-locals" "e" #'projectile-edit-dir-locals :desc "Edit project .dir-locals" "e" #'projectile-edit-dir-locals
:desc "Find file in project" "f" #'projectile-find-file :desc "Find file in project" "f" #'projectile-find-file
:desc "Find file in other project" "F" #'doom/find-file-in-other-project :desc "Find file in other project" "F" #'doom/find-file-in-other-project
@ -338,7 +339,7 @@
"C-S-E" #'+vertico/embark-export-write "C-S-E" #'+vertico/embark-export-write
"C-w" #'kill-buffer "C-w" #'kill-buffer
"C-f" #'+default/search-buffer "C-f" #'+default/search-buffer
"C-g" #'vertico-repeat ; TODO make this grab the last search term and re-search instead "C-g" #'meow-search
"C-s" #'save-buffer "C-s" #'save-buffer
"C-;" #'comment-dwim "C-;" #'comment-dwim
"C-/" #'comment-line "C-/" #'comment-line
@ -362,8 +363,12 @@
"C-<return>" #'split-window-vertically "C-<return>" #'split-window-vertically
"C-S-<return>" #'split-window-horizontally "C-S-<return>" #'split-window-horizontally
"C-<backspace>" #'sp-backward-delete-word "C-<backspace>" #'sp-backward-delete-word
"C-<delete>" #'sp-delete-word) "C-<delete>" #'sp-delete-word
;; "C-M-<SPC>" #'my/call-localleader) "C-(" #'sp-wrap-round
"C-[" #'sp-wrap-square
"C-{" #'sp-wrap-curly)
;; "C-M-<SPC>" #'my/call-localleader)
(map! (:when (modulep! :ui popup) (map! (:when (modulep! :ui popup)
"C-`" #'+popup/toggle "C-`" #'+popup/toggle

View file

@ -256,10 +256,3 @@
:config :config
(global-colorful-mode t) (global-colorful-mode t)
(add-to-list 'global-colorful-modes 'helpful-mode)) (add-to-list 'global-colorful-modes 'helpful-mode))
(use-package! mpdel-embark
:demand t
:after (embark mpdel)
:config
(progn
(mpdel-embark-setup)))

View file

@ -27,7 +27,7 @@
doom-dashboard ; a nifty splash screen for Emacs doom-dashboard ; a nifty splash screen for Emacs
(emoji +unicode) ; 🙂 (emoji +unicode) ; 🙂
hl-todo ; highlight TODO/FIXME/NOTE/DEPRECATED/HACK/REVIEW hl-todo ; highlight TODO/FIXME/NOTE/DEPRECATED/HACK/REVIEW
(ligatures +extra) ; ligatures and symbols to make your code pretty again ligatures ; ligatures and symbols to make your code pretty again
minimap ; show a map of the code on the side minimap ; show a map of the code on the side
modeline ; snazzy, Atom-inspired modeline, plus API modeline ; snazzy, Atom-inspired modeline, plus API
nav-flash ; blink cursor line after big motions nav-flash ; blink cursor line after big motions
@ -111,7 +111,7 @@
:app :app
;;calendar ;;calendar
emms ;; emms
:config :config
(default +smartparens)) (default +smartparens))

22
meow.el
View file

@ -15,10 +15,12 @@
(meow--make-selection '(select . visit) beg (if isearch-forward end isearch-other-end)) (meow--make-selection '(select . visit) beg (if isearch-forward end isearch-other-end))
(meow--select (not isearch-forward))))))) (meow--select (not isearch-forward)))))))
(setf meow--kbd-forward-char "<right>"
meow--kbd-undo "C-z")
(add-hook 'isearch-mode-end-hook 'meow--post-isearch-function) (add-hook 'isearch-mode-end-hook 'meow--post-isearch-function)
(defun meow-setup () (defun meow-setup ()
(meow--setup-rectangle-mark t)
(setq meow-cheatsheet-layout meow-cheatsheet-layout-qwerty) (setq meow-cheatsheet-layout meow-cheatsheet-layout-qwerty)
(map! (map!
@ -75,6 +77,7 @@
'("o" . meow-block) '("o" . meow-block)
'("O" . meow-to-block) '("O" . meow-to-block)
'("p" . meow-yank) '("p" . meow-yank)
'("P" . meow-yank-pop)
'("q" . meow-quit) '("q" . meow-quit)
'("Q" . meow-goto-line) '("Q" . meow-goto-line)
'("r" . meow-swap-grab) '("r" . meow-swap-grab)
@ -82,7 +85,7 @@
'("s" . meow-kill) '("s" . meow-kill)
'("t" . meow-till) '("t" . meow-till)
'("u" . meow-undo) '("u" . meow-undo)
'("U" . meow-undo-in-selection) '("U" . undo-redo)
'("v" . meow-visit) '("v" . meow-visit)
'("w" . meow-mark-word) '("w" . meow-mark-word)
'("W" . meow-mark-symbol) '("W" . meow-mark-symbol)
@ -90,22 +93,25 @@
'("X" . meow-goto-line) '("X" . meow-goto-line)
'("y" . meow-save) '("y" . meow-save)
'("Y" . meow-sync-grab) '("Y" . meow-sync-grab)
'("z" . meow-pop-selection) '("z" . end-of-buffer)
'("Z" . beginning-of-buffer)
'("<" . meow-beginning-of-thing)
'(">" . meow-end-of-thing)
'("/" . bookmark-in-project-jump)
'("'" . repeat) '("'" . repeat)
'("=" . meow--eval-sexp) '("=" . meow--eval-sexp)
'("[" . sp-backward-sexp) '("[" . sp-backward-sexp)
'("]" . sp-forward-sexp) '("]" . sp-forward-sexp)
'("{" . sp-backward-up-sexp) '("{" . sp-backward-up-sexp)
'("}" . sp-down-sexp) '("}" . sp-down-sexp)
'("<" . meow-beginning-of-thing)
'(">" . meow-end-of-thing)
'("/" . bookmark-in-project-jump)
'("?" . bookmark-jump) '("?" . bookmark-jump)
'("÷" . bookmark-delete) '("/" . bookmark-set)
'("\\" . bookmark-delete)
'("#" . string-inflection-all-cycle) '("#" . string-inflection-all-cycle)
'("<escape>" . doom/escape))) '("<escape>" . doom/escape)))
(use-package! meow (use-package! meow
:demand t
:config :config
(meow-setup) (meow-setup)
(pushnew! meow-mode-state-list '(mu4e-main-mode . motion)) (pushnew! meow-mode-state-list '(mu4e-main-mode . motion))
@ -113,4 +119,4 @@
(pushnew! meow-mode-state-list '(sly-inspector-mode . motion)) (pushnew! meow-mode-state-list '(sly-inspector-mode . motion))
(pushnew! meow-mode-state-list '(vterm-mode . insert)) (pushnew! meow-mode-state-list '(vterm-mode . insert))
(pushnew! meow-mode-state-list '(sly-mode . insert)) (pushnew! meow-mode-state-list '(sly-mode . insert))
(meow-global-mode 1)) (meow-global-mode))

View file

@ -57,21 +57,6 @@
:host github :host github
:repo "mkcms/mu4e-overview")) :repo "mkcms/mu4e-overview"))
(package! listen
:recipe (:type git
:host github
:repo "alphapapa/listen.el"))
(package! mpdel
:recipe (:type git
:host github
:repo "mpdel/mpdel"))
(package! mpdel-embark
:recipe (:type git
:host github
:repo "mpdel/mpdel-embark"))
(package! just-mode) (package! just-mode)
(package! justl) (package! justl)
(package! fennel-mode) (package! fennel-mode)