From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 8 Apr 1995 20:48:07 +0000 (+0000)
Subject: (make-comint): Error, if start-process is not fboundp.
X-Git-Tag: emacs-19.34~4548
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=af37b2e6950973c1c6b2c9a594f912ccc3932679;p=emacs.git

(make-comint): Error, if start-process is not fboundp.
---

diff --git a/lisp/comint.el b/lisp/comint.el
index edf8e373022..de0d63a50db 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -513,6 +513,8 @@ running process in that buffer, it is not restarted.  Optional third arg
 STARTFILE is the name of a file to send the contents of to the process.
 
 If PROGRAM is a string, any more args are arguments to PROGRAM."
+  (or (fboundp 'start-process)
+      (error "Multi-processing is not supported for this system"))
   (let ((buffer (get-buffer-create (concat "*" name "*"))))
     ;; If no process, or nuked process, crank up a new one and put buffer in
     ;; comint mode.  Otherwise, leave buffer and existing process alone.