From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Wed, 12 Aug 2020 16:09:24 +0000 (+0200)
Subject: Check make-process to determine if we support multi-processing
X-Git-Tag: emacs-28.0.90~6654
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6cddb736e404f7f4bf15f6644a003aadd56685c2;p=emacs.git

Check make-process to determine if we support multi-processing

* lisp/eshell/esh-proc.el (eshell-gather-process-output):
* lisp/comint.el (make-comint-in-buffer): Check that make-process
exists instead of start-file-process (which always exists).
---

diff --git a/lisp/comint.el b/lisp/comint.el
index df947b93afa..c3cb439d8b8 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -735,7 +735,7 @@ contents are sent to the process as its initial input.
 If PROGRAM is a string, any more args are arguments to PROGRAM.
 
 Return the (possibly newly created) process buffer."
-  (or (fboundp 'start-file-process)
+  (or (fboundp 'make-process)
       (error "Multi-processing is not supported for this system"))
   (setq buffer (get-buffer-create (or buffer (concat "*" name "*"))))
   ;; If no process, or nuked process, crank up a new one and put buffer in
diff --git a/lisp/eshell/esh-proc.el b/lisp/eshell/esh-proc.el
index d2c17fe1f77..db1b258c8f5 100644
--- a/lisp/eshell/esh-proc.el
+++ b/lisp/eshell/esh-proc.el
@@ -295,7 +295,7 @@ See `eshell-needs-pipe'."
 	 (process-environment (eshell-environment-variables))
 	 proc decoding encoding changed)
     (cond
-     ((fboundp 'start-file-process)
+     ((fboundp 'make-process)
       (setq proc
 	    (let ((process-connection-type
 		   (unless (eshell-needs-pipe-p command)