diff options
| author | Dmitry Gutov | 2015-06-04 02:46:16 +0300 |
|---|---|---|
| committer | Dmitry Gutov | 2015-06-04 02:46:43 +0300 |
| commit | 6d020ecd8951244296ebefc04d15eb10781bb846 (patch) | |
| tree | de1c08396862640258e6cfeac9919fb3730c196f | |
| parent | 0c182b332d455b19c72e4bdd77bc7a728ac1e380 (diff) | |
| download | emacs-6d020ecd8951244296ebefc04d15eb10781bb846.tar.gz emacs-6d020ecd8951244296ebefc04d15eb10781bb846.zip | |
Override 'grep --color=always'
* lisp/progmodes/xref.el (xref-collect-matches):
Override --color=always in grep-find-template.
| -rw-r--r-- | lisp/progmodes/xref.el | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el index f786d4e3ac7..89a9cf5d5ea 100644 --- a/lisp/progmodes/xref.el +++ b/lisp/progmodes/xref.el | |||
| @@ -749,8 +749,13 @@ tools are used, and when." | |||
| 749 | (require 'semantic/fw) | 749 | (require 'semantic/fw) |
| 750 | (grep-compute-defaults) | 750 | (grep-compute-defaults) |
| 751 | (defvar grep-find-template) | 751 | (defvar grep-find-template) |
| 752 | (let* ((grep-find-template (replace-regexp-in-string "-e " "-E " | 752 | (let* ((grep-find-template |
| 753 | grep-find-template t t)) | 753 | (replace-regexp-in-string |
| 754 | ;; Override the use ot '--color=always' on MS-Windows. | ||
| 755 | "--color=always" "" | ||
| 756 | (replace-regexp-in-string "-e " "-E " | ||
| 757 | grep-find-template t t) | ||
| 758 | t t)) | ||
| 754 | (command (rgrep-default-command (xref--regexp-to-extended regexp) | 759 | (command (rgrep-default-command (xref--regexp-to-extended regexp) |
| 755 | "*.*" dir)) | 760 | "*.*" dir)) |
| 756 | (orig-buffers (buffer-list)) | 761 | (orig-buffers (buffer-list)) |