Commit 6fec047e authored by Juri Linkov's avatar Juri Linkov

* lisp/progmodes/grep.el (zrgrep): Let-bind grep-highlight-matches

before calling grep-compute-defaults because now it affects the
command lines computed in grep-compute-defaults. (Bug#20728)
parent 809885c2
......@@ -1077,6 +1077,9 @@ 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"))))
......@@ -1094,10 +1097,7 @@ 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)))))))
;; Set `grep-highlight-matches' to `always'
;; since `zgrep' puts filters in the grep output.
(let ((grep-find-template template)
(grep-highlight-matches 'always))
(let ((grep-find-template template))
(rgrep regexp files dir confirm)))
;;;###autoload
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment