Index: emacs/lisp/progmodes/compile.el
diff -c emacs/lisp/progmodes/compile.el:1.373 
emacs/lisp/progmodes/compile.el:1.374
*** emacs/lisp/progmodes/compile.el:1.373       Mon Aug 15 21:29:32 2005
--- emacs/lisp/progmodes/compile.el     Sat Aug 20 12:14:24 2005
***************
*** 446,451 ****
--- 446,459 ----
    :type 'string
    :group 'compilation)
  
+ (defcustom compilation-disable-input t
+   "*If non-nil, send end-of-file as compilation process input.
+ This only affects platforms that support asynchronous processes (see
+ start-process); synchronous compilation processes never accept input."
+   :type 'boolean
+   :group 'compilation
+   :version "22.1")
+ 
  ;; A weak per-compilation-buffer hash indexed by (FILENAME . DIRECTORY).  Each
  ;; value is a FILE-STRUCTURE as described above, with the car eq to the hash
  ;; key.        This holds the tree seen from root, for storing new nodes.
***************
*** 1022,1027 ****
--- 1030,1037 ----
                                                       outbuf command))))
              ;; Make the buffer's mode line show process state.
              (setq mode-line-process '(":%s"))
+             (when compilation-disable-input
+               (process-send-eof proc))
              (set-process-sentinel proc 'compilation-sentinel)
              (set-process-filter proc 'compilation-filter)
              (set-marker (process-mark proc) (point) outbuf)


_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs

Reply via email to