Add deadgrep-current-directory

This commit is contained in:
David Morgan 2022-11-11 12:07:49 +00:00
parent 4b9f7ce18a
commit cab1d7261b
Signed by: djm
GPG Key ID: C171251002C200F2
1 changed files with 6 additions and 1 deletions

View File

@ -51,11 +51,16 @@
(defun deadgrep-symbol-at-point ()
(interactive)
(deadgrep (thing-at-point 'symbol)))
(defun deadgrep-current-directory (search-term)
(interactive (list (deadgrep--read-search-term)))
(deadgrep search-term (file-name-directory buffer-file-name)))
:bind
("C-S-z" . deadgrep-symbol-at-point)
("C-c c d" . deadgrep)
("C-S-z" . deadgrep-symbol-at-point)
("C-c c C-d" . deadgrep-current-directory)
(:map search-map
("d" . deadgrep)
("C-d" . deadgrep-current-directory)
("D" . deadgrep-symbol-at-point)))
(use-package affe