diff options
Diffstat (limited to '.emacs.d/lisp')
| -rw-r--r-- | .emacs.d/lisp/init-search.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/.emacs.d/lisp/init-search.el b/.emacs.d/lisp/init-search.el index bab0591..5e278e3 100644 --- a/.emacs.d/lisp/init-search.el +++ b/.emacs.d/lisp/init-search.el @@ -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 |