Bind grep-highlight-matches around the rgrep call
* lisp/progmodes/grep.el (zrgrep): Bind grep-highlight-matches around the rgrep call (bug#20728).
This commit is contained in:
parent
a1dde6b50f
commit
bbf63ee00a
1 changed files with 4 additions and 4 deletions
|
@ -1089,9 +1089,6 @@ file name to `*.gz', and sets `grep-highlight-matches' to `always'."
|
|||
(grep-find-template nil)
|
||||
(grep-find-command nil)
|
||||
(grep-host-defaults-alist nil)
|
||||
;; Set `grep-highlight-matches' to `always'
|
||||
;; since `zgrep' puts filters in the grep output.
|
||||
(grep-highlight-matches 'always)
|
||||
;; Use for `grep-read-files'
|
||||
(grep-files-aliases '(("all" . "* .*")
|
||||
("gz" . "*.gz"))))
|
||||
|
@ -1109,7 +1106,10 @@ file name to `*.gz', and sets `grep-highlight-matches' to `always'."
|
|||
nil default-directory t))
|
||||
(confirm (equal current-prefix-arg '(4))))
|
||||
(list regexp files dir confirm grep-find-template)))))))
|
||||
(let ((grep-find-template template))
|
||||
(let ((grep-find-template template)
|
||||
;; Set `grep-highlight-matches' to `always'
|
||||
;; since `zgrep' puts filters in the grep output.
|
||||
(grep-highlight-matches 'always))
|
||||
(rgrep regexp files dir confirm)))
|
||||
|
||||
;;;###autoload
|
||||
|
|
Loading…
Add table
Reference in a new issue