From ca7e42cfa0c423675dd48e85d4bc108f1c78b8d6 Mon Sep 17 00:00:00 2001
From: interp <interp>
Date: Wed, 19 Feb 2003 18:47:04 +0000
Subject: [PATCH] use scheme-with-scsh where appropriate.

---
 scheme/httpd/surflets/packages.scm | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/scheme/httpd/surflets/packages.scm b/scheme/httpd/surflets/packages.scm
index 8d260c1..2c8232c 100644
--- a/scheme/httpd/surflets/packages.scm
+++ b/scheme/httpd/surflets/packages.scm
@@ -208,8 +208,7 @@
 	let-opt				;:OPTIONAL
 	handle-fatal-error
 	(subset sunet-utilities (get-header)) ; GET-HEADER
-	scsh
-	scheme)
+	scheme-with-scsh)
   (files surflets))
 
 (define-interface surflet-interface
@@ -268,8 +267,7 @@
 	srfi-13
 	srfi-1
 	locks
-	scsh
-	scheme)
+	scheme-with-scsh)
   (files profile))
 
 (define-interface simple-surflet-api-interface
@@ -287,8 +285,7 @@
 	  extract))
 
 (define-structure simple-surflet-api simple-surflet-api-interface
-  (open scsh
-	scheme
+  (open scheme-with-scsh
 	define-record-types
 	let-opt
 	surflets