djm
/
dotfiles
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add consult-ripgrep-parent

This commit is contained in:
David Morgan 2022-09-16 12:36:33 +01:00
parent 5571c02c19
commit 3f873ccb89
Signed by: djm
GPG Key ID: C171251002C200F2
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
.emacs.d/lisp/init-minibuffer.el
View File

@ -174,6 +174,7 @@ DEFS is a plist associating completion categories to commands."
("C-c c s" . consult-ripgrep-case-sensitive)
("C-c c z" . consult-z-ripgrep)
("C-c C-*" . consult-ripgrep-symbol-at-point)
("C-c C-^" . consult-ripgrep-parent)
("M-y" . consult-yank-pop) ;; orig. yank-pop
("<help> a" . consult-apropos) ;; orig. apropos-command
;; M-g bindings (goto-map)
@ -241,6 +242,9 @@ DEFS is a plist associating completion categories to commands."
(defun consult-line-symbol-at-point ()
(interactive)
(consult-line (thing-at-point 'symbol)))
(defun consult-parent-ripgrep (&optional initial)
(interactive "P")
(consult-ripgrep (file-name-directory (directory-file-name (persp-current-project-root))) initial))
(defvar consult--fd-command nil)
(defun consult--fd-builder (input)
(unless consult--fd-command