Add load-option.

diff --git a/v7/src/edwin/doscom.scm b/v7/src/edwin/doscom.scm
index 8d3b8feeafb73106638628ba97df3d1bcdb5f85b..26562798a7ad454375e9bb727be897864e5dcbaa 100644 (file)
--- a/v7/src/edwin/doscom.scm
+++ b/v7/src/edwin/doscom.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: doscom.scm,v 1.1 1993/02/25 02:49:43 gjr Exp $
+$Id: doscom.scm,v 1.2 1993/02/25 02:56:52 gjr Exp $
 
 Copyright (c) 1992-1993 Massachusetts Institute of Technology
 
@@ -41,6 +41,8 @@ license should have been included along with this file. |#
 
 (declare (usual-integrations))
 \f
+(load-option 'DOSPROCESS)
+
 (define-command shell-command
   "Execute string COMMAND in inferior shell; display output, if any.
 Optional second arg true (prefix arg, if interactive) means

diff --git a/v7/src/edwin/dosshell.scm b/v7/src/edwin/dosshell.scm
index 923616347055df8ea79db395797dee262b9667db..d7dced68795c82bb77a87bde178e9a0f09716ea8 100644 (file)
--- a/v7/src/edwin/dosshell.scm
+++ b/v7/src/edwin/dosshell.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: dosshell.scm,v 1.1 1993/02/25 02:50:59 gjr Exp $
+$Id: dosshell.scm,v 1.2 1993/02/25 02:56:29 gjr Exp $
 
 Copyright (c) 1992-1993 Massachusetts Institute of Technology
 
@@ -42,6 +42,8 @@ license should have been included along with this file. |#
 
 (declare (usual-integrations))
 \f
+(load-option 'DOSPROCESS)
+
 (define-major-mode pseudo-shell fundamental "Pseudo Shell"
   "Major mode for executing DOS commands.
 Return executes the current line as a DOS command.