Mercurial > dotfiles
comparison .elisp/textmate.el @ 330:629b500e1276
textmate.el: disable color on use of egrep
| author | Augie Fackler <durin42@gmail.com> |
|---|---|
| date | Tue, 11 Mar 2014 14:16:37 -0400 |
| parents | c35b58b40fcb |
| children | ecb85d3ba960 |
comparison
equal
deleted
inserted
replaced
| 329:c35b58b40fcb | 330:629b500e1276 |
|---|---|
| 321 (command | 321 (command |
| 322 (cond ((not (string= type "unknown")) | 322 (cond ((not (string= type "unknown")) |
| 323 (concat (cond ((string= type "git") "git ls-files") | 323 (concat (cond ((string= type "git") "git ls-files") |
| 324 ((string= type "hg") "hg manifest")) | 324 ((string= type "hg") "hg manifest")) |
| 325 (if *textmate-vcs-exclude* | 325 (if *textmate-vcs-exclude* |
| 326 (concat " | egrep -v " | 326 (concat " | egrep --color=never -v " |
| 327 (shell-quote-argument *textmate-vcs-exclude*)) | 327 (shell-quote-argument *textmate-vcs-exclude*)) |
| 328 "") | 328 "") |
| 329 " | xargs egrep -nR " | 329 " | xargs egrep --color=never -nR " |
| 330 (if pattern (concat " --include='" pattern "' ") "") | 330 (if pattern (concat " --include='" pattern "' ") "") |
| 331 " -- " | 331 " -- " |
| 332 (shell-quote-argument re))) | 332 (shell-quote-argument re))) |
| 333 (t (concat "egrep -nR --exclude='" | 333 (t (concat "egrep --color=never -nR --exclude='" |
| 334 *textmate-gf-exclude* | 334 *textmate-gf-exclude* |
| 335 "' --include='" | 335 "' --include='" |
| 336 incpat | 336 incpat |
| 337 "' -- " | 337 "' -- " |
| 338 (shell-quote-argument re) | 338 (shell-quote-argument re) |
