diff --git a/emacs.d/editing.el b/emacs.d/editing.el index f3f7883..8b7988c 100644 --- a/emacs.d/editing.el +++ b/emacs.d/editing.el @@ -70,6 +70,10 @@ (use-package paredit :ensure t + :bind + ( :map paredit-mode-map + ("M-s" . nil) ; conflicts with preferred consult key binds + ) :config (add-hook 'emacs-lisp-mode-hook #'enable-paredit-mode) ;; wtf? diff --git a/emacs.d/ui.el b/emacs.d/ui.el index 70c4a14..3b916bb 100644 --- a/emacs.d/ui.el +++ b/emacs.d/ui.el @@ -112,3 +112,24 @@ (defun gered/switch-to-previous-buffer () (interactive) (switch-to-buffer (other-buffer (current-buffer) 1)))) + +(use-package consult + :ensure t + :bind + (([remap switch-to-buffer] . consult-buffer) + ([remap yank-pop] . consult-yank-pop) + ([remap isearch-forward] . consult-line) + ("C-c M-x" . consult-mode-command) + ("M-s d" . consult-find) + ("M-s r" . consult-ripgrep) + ("M-s l" . consult-line) + ("M-s s" . consult-line) + ("M-s L" . consult-line-multi) + ("M-s o" . consult-outline) + :map isearch-mode-map + ("M-e" . consult-isearch-history) + ("M-s e" . consult-isearch-history) + ("M-s l" . consult-line) + ("M-s L" . consult-line-multi)) + :config + (setq consult-narrow-key "<"))