mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-20 18:17:20 +00:00
Code Issues Releases Activity

(grep-program): Comment out the use of zgrep.

Browse Source
This commit is contained in:
Richard M. Stallman 1997-06-16 23:20:46 +00:00
parent b0edcc39e0
commit 000a6a765e
1 changed files with 10 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
lisp/progmodes/compile.el
View File

@ -341,16 +341,17 @@ Otherwise, it saves all modified buffers without asking."
;; The system null device. (Should reference NULL_DEVICE from C.)
(defvar grep-null-device "/dev/null" "The system null device.")
;; Use zgrep if available, to work nicely with compressed files.
;; Otherwise, use ordinary grep.
(defvar grep-program
(if (equal (condition-case nil ; in case "zgrep" isn't in exec-path
(call-process "zgrep" nil nil nil
"foo" grep-null-device)
(error nil))
1)
"zgrep"
"grep")
;; Currently zgrep has trouble. It runs egrep instead of grep,
;; and it doesn't pass along long options right.
"grep"
;;; (if (equal (condition-case nil ; in case "zgrep" isn't in exec-path
;;; (call-process "zgrep" nil nil nil
;;; "foo" grep-null-device)
;;; (error nil))
;;; 1)
;;; "zgrep"
;;; "grep")
"The default grep program for `grep-command' and `grep-find-command'.")
;; Use -e if grep supports it,