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) |