blob: 997bc0a2a0d5d1f28f073dbb313b1a622730939f (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
(defun project-git-grep ()
(interactive)
(let ((search-regexp (grep-read-regexp))
(dir (project-root (project-current t))))
(vc-git-grep search-regexp "" dir)))
(use-package project
:ensure t
:init
;; commands to show when switching projects
(setq project-switch-commands '((?f "Find file" project-find-file)
(?d "Dired" project-dired)
(?g "Grep" project-git-grep)
(?m "Magit" magit-status)))
:bind (;; C-x f finds file in project
("C-x f" . project-find-file)
;; C-c p switches project
("C-c p" . project-switch-project)
;; C-c g runs git grep in project
("C-c g" . project-git-grep)
;; C-c m compiles project
("C-c m" . project-compile)))
(provide 'init-project)
|
