diff options
| -rw-r--r-- | lisp/progmodes/grep.el | 12 |
1 files changed, 1 insertions, 11 deletions
diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el index fe2bbdec14e..ac12efe8cdd 100644 --- a/lisp/progmodes/grep.el +++ b/lisp/progmodes/grep.el | |||
| @@ -315,17 +315,7 @@ Notice that using \\[next-error] or \\[compile-goto-error] modifies | |||
| 315 | This gets tacked on the end of the generated expressions.") | 315 | This gets tacked on the end of the generated expressions.") |
| 316 | 316 | ||
| 317 | ;;;###autoload | 317 | ;;;###autoload |
| 318 | (defvar grep-program | 318 | (defvar grep-program "grep" |
| 319 | ;; Currently zgrep has trouble. It runs egrep instead of grep, | ||
| 320 | ;; and it doesn't pass along long options right. | ||
| 321 | "grep" | ||
| 322 | ;; (if (equal (condition-case nil ; in case "zgrep" isn't in exec-path | ||
| 323 | ;; (call-process "zgrep" nil nil nil | ||
| 324 | ;; "foo" null-device) | ||
| 325 | ;; (error nil)) | ||
| 326 | ;; 1) | ||
| 327 | ;; "zgrep" | ||
| 328 | ;; "grep") | ||
| 329 | "The default grep program for `grep-command' and `grep-find-command'. | 319 | "The default grep program for `grep-command' and `grep-find-command'. |
| 330 | This variable's value takes effect when `grep-compute-defaults' is called.") | 320 | This variable's value takes effect when `grep-compute-defaults' is called.") |
| 331 | 321 | ||