changeset 65056:fb6294015f51

(grep): Bind compilation-disable-input to t.
author Richard M. Stallman <rms@gnu.org>
date Sat, 20 Aug 2005 21:47:40 +0000
parents 0b9598224a95
children d92890473bd3
files lisp/progmodes/grep.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/grep.el	Sat Aug 20 21:47:06 2005 +0000
+++ b/lisp/progmodes/grep.el	Sat Aug 20 21:47:40 2005 +0000
@@ -517,7 +517,8 @@
 
   ;; Setting process-setup-function makes exit-message-function work
   ;; even when async processes aren't supported.
-  (let ((compilation-process-setup-function 'grep-process-setup))
+  (let ((compilation-process-setup-function 'grep-process-setup)
+	(compilation-disable-input t))
     (compilation-start (if (and grep-use-null-device null-device)
 			   (concat command-args " " null-device)
 			 command-args)