소스 검색

Add projectile support

master
10sr 6 년 전
부모
커밋
b467018844
로그인 계정: 10sr GPG 키 ID: 7BEC428194130EB2
1개의 변경된 파일9개의 추가작업 그리고 3개의 파일을 삭제
  1. +9
    -3
      emacs.el

+ 9
- 3
emacs.el 파일 보기

@@ -1458,7 +1458,8 @@ Commands are searched from ALIST."

(defun my-rgrep (command-args)
"My recursive grep. Run COMMAND-ARGS.
If prefix argument is given use current symbol as default search target."
If prefix argument is given, use current symbol as default search target
and search from projectile root (if projectile is available)."
(interactive (let ((cmd (my-rgrep-grep-command my-rgrep-default
nil)))
(if cmd
@@ -1470,8 +1471,13 @@ If prefix argument is given use current symbol as default search target."
'grep-find-history))
(error "My-Rgrep: Command for rgrep not found")
)))
(compilation-start command-args
'grep-mode))
(if (and current-prefix-arg
(safe-require-or-eval 'projectile))
(projectile-with-default-dir (projectile-project-root)
(compilation-start command-args
'grep-mode))
(compilation-start command-args
'grep-mode)))

(defmacro define-my-rgrep (name)
"Define rgrep for NAME."


불러오는 중...
취소
저장