From 82a5dcdd1061368224894b4a7ec9de4d3ec8198d Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Wed, 24 Aug 2005 05:08:01 +0000
Subject: [PATCH] foo

---
 library/httpd/load.factor | 18 ------------------
 library/ui/load.factor    |  6 ++++--
 2 files changed, 4 insertions(+), 20 deletions(-)
 delete mode 100644 library/httpd/load.factor

diff --git a/library/httpd/load.factor b/library/httpd/load.factor
deleted file mode 100644
index 3d78266fc9..0000000000
--- a/library/httpd/load.factor
+++ /dev/null
@@ -1,18 +0,0 @@
-USING: kernel parser sequences io ;
-[
-    "/library/httpd/http-common.factor"
-    "/library/httpd/mime.factor"
-    "/library/httpd/html-tags.factor"
-    "/library/httpd/html.factor"
-    "/library/httpd/responder.factor"
-    "/library/httpd/httpd.factor"
-    "/library/httpd/file-responder.factor"
-    "/library/httpd/test-responder.factor"
-    "/library/httpd/resource-responder.factor"
-    "/library/httpd/cont-responder.factor"
-    "/library/httpd/browser-responder.factor"
-    "/library/httpd/default-responders.factor"
-    "/library/httpd/http-client.factor"
-] [
-    dup print run-resource
-] each
diff --git a/library/ui/load.factor b/library/ui/load.factor
index b996162deb..8fa46733ce 100644
--- a/library/ui/load.factor
+++ b/library/ui/load.factor
@@ -1,4 +1,4 @@
-USING: kernel parser sequences io ;
+USING: image kernel parser sequences io ;
 [
     "/library/ui/gadgets.factor"
     "/library/ui/hierarchy.factor"
@@ -25,5 +25,7 @@ USING: kernel parser sequences io ;
     "/library/ui/books.factor"
     "/library/ui/ui.factor"
 ] [
-    dup print run-resource
+    dup print
+    bootstrapping? get
+    [ parse-resource % ] [ run-resource ] ifte
 ] each