refining meow config
This commit is contained in:
parent
4439744064
commit
be6664d1f1
2 changed files with 26 additions and 17 deletions
25
config.el
25
config.el
|
@ -97,20 +97,19 @@
|
||||||
(after! smart-tabs-mode
|
(after! smart-tabs-mode
|
||||||
(smart-tabs-insinuate 'c 'javascript 'python))
|
(smart-tabs-insinuate 'c 'javascript 'python))
|
||||||
|
|
||||||
;; lsp mode config to work with corfu/cape
|
;; Add consult-line seraches to isearch history (both regular and regex) -- can now use meow 'n' to continue search as well as isearch
|
||||||
;; (after! lsp-mode
|
(advice-add #'consult-line :after
|
||||||
;; (setq lsp-completion-provider :none)
|
(lambda (&rest _)
|
||||||
;; (setq lsp-signature-render-documentation nil)
|
(when consult--line-history
|
||||||
;; (setq lsp-completion-show-kind t)
|
(add-to-history
|
||||||
;; (setq lsp-ui-doc-show-with-mouse nil)
|
'regexp-search-ring
|
||||||
|
(car consult--line-history)
|
||||||
|
regexp-search-ring-max)
|
||||||
|
(add-to-history
|
||||||
|
'search-ring
|
||||||
|
(car consult--line-history)
|
||||||
|
search-ring-max))))
|
||||||
|
|
||||||
;; (setq +lsp-company-backends
|
|
||||||
;; '(:separate company-capf company-yasnippet company-dabbrev))
|
|
||||||
|
|
||||||
;; (defun my/lsp-mode-setup-completion ()
|
|
||||||
;; (setf (alist-get 'styles (alist-get 'lsp-capf completion-category-defaults))
|
|
||||||
;; '(orderless)))
|
|
||||||
;; (add-hook! lsp-completion-mode 'my/lsp-mode-setup-completion))
|
|
||||||
|
|
||||||
;; bibliography file location
|
;; bibliography file location
|
||||||
(after! citar
|
(after! citar
|
||||||
|
|
|
@ -77,8 +77,6 @@
|
||||||
";" #'meow-reverse
|
";" #'meow-reverse
|
||||||
"," #'meow-inner-of-thing
|
"," #'meow-inner-of-thing
|
||||||
"." #'meow-bounds-of-thing
|
"." #'meow-bounds-of-thing
|
||||||
"=" #'isearch-forward
|
|
||||||
"+" #'isearch-backward
|
|
||||||
"\\" #'bookmark-jump
|
"\\" #'bookmark-jump
|
||||||
"'" #'repeat
|
"'" #'repeat
|
||||||
":" #'eval-last-sexp
|
":" #'eval-last-sexp
|
||||||
|
@ -86,9 +84,22 @@
|
||||||
"]" #'sp-forward-sexp
|
"]" #'sp-forward-sexp
|
||||||
"{" #'sp-backward-up-sexp
|
"{" #'sp-backward-up-sexp
|
||||||
"}" #'sp-down-sexp
|
"}" #'sp-down-sexp
|
||||||
|
"/" #'isearch-forward
|
||||||
|
"'" #'isearch-backward
|
||||||
"<escape>" #'corfu-quit))
|
"<escape>" #'corfu-quit))
|
||||||
|
|
||||||
|
|
||||||
|
(defun meow--post-isearch-function ()
|
||||||
|
(unless isearch-mode-end-hook-quit
|
||||||
|
(when isearch-success
|
||||||
|
(let ((beg (car isearch-match-data))
|
||||||
|
(end (cadr isearch-match-data)))
|
||||||
|
(thread-first
|
||||||
|
(meow--make-selection '(select . visit) beg (if isearch-forward end isearch-other-end))
|
||||||
|
(meow--select (not isearch-forward)))))))
|
||||||
|
|
||||||
|
(add-hook 'isearch-mode-end-hook 'meow--post-isearch-function)
|
||||||
|
|
||||||
(use-package! meow
|
(use-package! meow
|
||||||
:hook (doom-after-modules-config . meow-global-mode)
|
:hook (doom-after-modules-config . meow-global-mode)
|
||||||
:demand t
|
:demand t
|
||||||
|
@ -103,5 +114,4 @@
|
||||||
(meow/setup-leader)
|
(meow/setup-leader)
|
||||||
(pushnew! meow-mode-state-list '(sly-db-mode . motion))
|
(pushnew! meow-mode-state-list '(sly-db-mode . motion))
|
||||||
(pushnew! meow-mode-state-list '(sly-inspector-mode . motion))
|
(pushnew! meow-mode-state-list '(sly-inspector-mode . motion))
|
||||||
(pushnew! meow-mode-state-list '(custom-mode . normal))
|
(pushnew! meow-mode-state-list '(custom-mode . motion)))
|
||||||
(map! :map meow-keymap [remap describe-key] #'helpfl-key))
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue