From be308133d21d81449c116a0e664b92641ebd7618 Mon Sep 17 00:00:00 2001
From: interp <interp>
Date: Fri, 20 Sep 2002 19:25:20 +0000
Subject: [PATCH] opens packages and structures for servlet-server in right
 order note: needs (r5rs-) SSAX to be present

---
 scheme/httpd/surflets/load-surflet-server.scm | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 scheme/httpd/surflets/load-surflet-server.scm

diff --git a/scheme/httpd/surflets/load-surflet-server.scm b/scheme/httpd/surflets/load-surflet-server.scm
new file mode 100644
index 0000000..5f44c6f
--- /dev/null
+++ b/scheme/httpd/surflets/load-surflet-server.scm
@@ -0,0 +1,11 @@
+; reads package description in the right order
+; in the end, the server can be started via (main '())
+(batch 'on)
+(config)
+(load "/home/andreas/hiwi/sunet/packages.scm")
+(load "/home/andreas/hiwi/sunet/SSAX/lib/packages.scm")
+(load "/home/andreas/hiwi/sunet/httpd/servlets/packages.scm")
+(load "/home/andreas/hiwi/sunet/httpd/servlets/start-servlet-server")
+(user)
+(open 'servlet-server)
+(batch 'off)
\ No newline at end of file