sjs/config
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

updated textmate-find-regex-in-project (still sucks though)

Browse source 
need to create a mode based on grep-mode that doesn't suck
This commit is contained in:
Sami Samhuri 2010-08-29 18:40:40 -07:00
parent d78d5b6a82
commit f9d94b45fc
1 changed files with 7 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
emacs.d/textmate.el
View file

@ -301,20 +301,24 @@ Symbols matching the text at point are put first in the completion list."
(setq *textmate-project-files* nil)
(message "textmate-mode cache cleared."))
;; FIXME:
;; - use *textmate-gf-exclude* instead of hard-coding ignored paths
;; - format results nicely (like TextMate)
(defun textmate-find-regex-in-project (regex)
"Search the project for a regular expression and quickly jump
to matches in a project.
This function just finds the project root and calls `LGREP'."
This function just finds the project root and calls `RGREP'."
(interactive "sRegex: ")
(let ((root (textmate-project-root)))
(when (null root)
(error
(concat
"Can't find a suitable project root ("
(string-join " " *textmate-project-roots* )
(string-join " " *textmate-project-roots*)
")")))
(lgrep regex "*" root)))
(grep (concat "grep -Hn -E '" regex "' " root "/**/{*.j,*.js,*akefile,*.sh}(N) | grep -vE '/([Bb]uild|Frameworks|.git)/?' | sed -e 's#" root "/##'"))))
;;; Utilities