1
0
Fork 0

feat(emacs): use meow

Signed-off-by: Lucas Sta Maria <lucas@priime.dev>
This commit is contained in:
Lucas Sta Maria 2024-02-12 13:11:32 -05:00
parent dac443c55f
commit c557abef9e
No known key found for this signature in database
GPG key ID: F07FB16A826E3B47
2 changed files with 87 additions and 0 deletions

View file

@ -5,6 +5,7 @@
;; short), then it belongs here. ;; short), then it belongs here.
;;; Code: ;;; Code:
(require 'meow)
(require 'lsp-mode) (require 'lsp-mode)
(require 'eglot) (require 'eglot)
(require 'git-gutter) (require 'git-gutter)
@ -57,6 +58,91 @@
(filepath (or filepath (read-file-name "filename: ")))) (filepath (or filepath (read-file-name "filename: "))))
(url-copy-file url filepath 1))) (url-copy-file url filepath 1)))
;; meow
(defun meow-setup ()
"Set up meow."
(setq meow-cheatsheet-layout meow-cheatsheet-layout-dvp)
(meow-leader-define-key
'("?" . meow-cheatsheet))
(meow-motion-overwrite-define-key
;; custom keybinding for motion state
'("<escape>" . ignore))
(meow-normal-define-key
'("?" . meow-cheatsheet)
'("*" . meow-expand-0)
'("=" . meow-expand-9)
'("!" . meow-expand-8)
'("[" . meow-expand-7)
'("]" . meow-expand-6)
'("{" . meow-expand-5)
'("+" . meow-expand-4)
'("}" . meow-expand-3)
'(")" . meow-expand-2)
'("(" . meow-expand-1)
'("1" . digit-argument)
'("2" . digit-argument)
'("3" . digit-argument)
'("4" . digit-argument)
'("5" . digit-argument)
'("6" . digit-argument)
'("7" . digit-argument)
'("8" . digit-argument)
'("9" . digit-argument)
'("0" . digit-argument)
'("-" . negative-argument)
'(";" . meow-reverse)
'("," . meow-inner-of-thing)
'("." . meow-bounds-of-thing)
'("<" . meow-beginning-of-thing)
'(">" . meow-end-of-thing)
'("a" . meow-append)
'("A" . meow-open-below)
'("b" . meow-back-word)
'("B" . meow-back-symbol)
'("c" . meow-change)
'("d" . meow-delete)
'("D" . meow-backward-delete)
'("e" . meow-line)
'("E" . meow-goto-line)
'("f" . meow-find)
'("g" . meow-cancel-selection)
'("G" . meow-grab)
'("h" . meow-left)
'("H" . meow-left-expand)
'("i" . meow-insert)
'("I" . meow-open-above)
'("j" . meow-join)
'("k" . meow-kill)
'("l" . meow-till)
'("m" . meow-mark-word)
'("M" . meow-mark-symbol)
'("n" . meow-next)
'("N" . meow-next-expand)
'("o" . meow-block)
'("O" . meow-to-block)
'("p" . meow-prev)
'("P" . meow-prev-expand)
'("q" . meow-quit)
'("r" . meow-replace)
'("R" . meow-swap-grab)
'("s" . meow-search)
'("t" . meow-right)
'("T" . meow-right-expand)
'("u" . meow-undo)
'("U" . meow-undo-in-selection)
'("v" . meow-visit)
'("w" . meow-next-word)
'("W" . meow-next-symbol)
'("x" . meow-save)
'("X" . meow-sync-grab)
'("y" . meow-yank)
'("z" . meow-pop-selection)
'("'" . repeat)
'("<escape>" . ignore)
'("TAB" . meow-indent)))
(meow-setup)
;; LSP ;; LSP
(setq lsp-inlay-hint-enable t) (setq lsp-inlay-hint-enable t)
(setq lsp-ui-doc-include-signature t) (setq lsp-ui-doc-include-signature t)

View file

@ -25,6 +25,7 @@
(straight-use-package 'consult) (straight-use-package 'consult)
;; Syntax checking and editing ;; Syntax checking and editing
(straight-use-package 'meow)
(straight-use-package 'flycheck) (straight-use-package 'flycheck)
(straight-use-package 'paredit) (straight-use-package 'paredit)