mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(grep): Bind compilation-disable-input to t.

Browse source
This commit is contained in:
Richard M. Stallman 2005-08-20 21:47:40 +00:00
parent 93ef35e404
commit 32993501da
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/progmodes/grep.el
View file

@ -517,7 +517,8 @@ temporarily highlight in visited source lines."
;; 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)