diff options
author | David Morgan <djm_uk@protonmail.com> | 2022-05-17 15:54:08 +0100 |
---|---|---|
committer | David Morgan <djm_uk@protonmail.com> | 2022-05-17 15:54:08 +0100 |
commit | d6d9ab292ff9ff3bb3bd6b672399bd5d9e6833cf (patch) | |
tree | 15dcb86dfbaaa03ee07a4f0aa2fae7dcbc5f47d2 /.emacs.d | |
parent | 4bb6cfd77e3ce738eed585d2465797700c396942 (diff) | |
download | dotfiles-d6d9ab292ff9ff3bb3bd6b672399bd5d9e6833cf.tar.gz |
Add consult-ripgrep-case-sensitive and add/improve bindings
Diffstat (limited to '.emacs.d')
-rw-r--r-- | .emacs.d/lisp/init-minibuffer.el | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/.emacs.d/lisp/init-minibuffer.el b/.emacs.d/lisp/init-minibuffer.el index 1351ec7..0ba6de5 100644 --- a/.emacs.d/lisp/init-minibuffer.el +++ b/.emacs.d/lisp/init-minibuffer.el @@ -146,7 +146,10 @@ DEFS is a plist associating completion categories to commands." ("M-*" . consult-line-symbol-at-point) ("C-c f" . consult-recent-file) ("C-c r" . consult-ripgrep) - ("C-c R" . consult-ripgrep-auto-preview) + ;; TODO find an alternative to C-c c? + ("C-c c r" . consult-ripgrep-auto-preview) + ("C-c c s" . consult-ripgrep-case-sensitive) + ("C-c c z" . consult-z-ripgrep) ("C-c C-*" . consult-ripgrep-symbol-at-point) ("M-y" . consult-yank-pop) ;; orig. yank-pop ("<help> a" . consult-apropos) ;; orig. apropos-command @@ -208,6 +211,10 @@ DEFS is a plist associating completion categories to commands." (interactive "P") (let ((consult-ripgrep-args (replace-regexp-in-string "\\." "-z ." consult-ripgrep-args))) (consult-ripgrep dir initial))) + (defun consult-ripgrep-case-sensitive (&optional dir initial) + (interactive "P") + (let ((consult-ripgrep-args (replace-regexp-in-string "\\." "-s ." consult-ripgrep-args))) + (consult-ripgrep dir initial))) (defun consult-buffer-no-preview () (interactive) (consult-buffer)) |