about summary refs log tree commit diff stats
path: root/.emacs.d/lisp/init-search.el
diff options
context:
space:
mode:
Diffstat (limited to '.emacs.d/lisp/init-search.el')
-rw-r--r--.emacs.d/lisp/init-search.el7
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