From 4540ad458963009bee227196164ba25420cc1df4 Mon Sep 17 00:00:00 2001
From: mainzelm <mainzelm>
Date: Fri, 16 Aug 2002 12:12:31 +0000
Subject: [PATCH] Don't call install-env when initializing scsh because this is
 already done by a reinitializer in scsh.scm.

---
 scsh/top.scm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/scsh/top.scm b/scsh/top.scm
index 4610216..3982df4 100644
--- a/scsh/top.scm
+++ b/scsh/top.scm
@@ -298,12 +298,14 @@
 		       name))
 
 (define (with-scsh-initialized interactive? context args thunk)
-  (with-scsh-sighandlers 
+  (with-scsh-sighandlers
    interactive?
    (lambda ()
      (with-autoreaping
       (lambda ()
-	(install-env)
+	;; environment is already installed by a resumer
+	;; c.f. env-reinitializer in scsh.scm
+	;; (install-env)
 	(initialize-cwd)
 	(init-scsh-vars interactive?)
 	(start-new-session context    
@@ -356,7 +358,7 @@
 		    (restart-command-processor 
 		     args 
 		     context 
-		     (lambda () 
+		     (lambda ()
 		       (display (string-append 
 				 "Welcome to scsh "
 				 scsh-version-string