From 59c4195889ea259dd7092c43534204a1fb17085f Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Tue, 24 Jan 2006 04:03:15 +0000
Subject: [PATCH] fix httpd load issue

---
 contrib/httpd/html.factor | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/contrib/httpd/html.factor b/contrib/httpd/html.factor
index be044c1979..654b52992a 100644
--- a/contrib/httpd/html.factor
+++ b/contrib/httpd/html.factor
@@ -149,6 +149,9 @@ M: html-stream stream-format ( str style stream -- )
         ] object-link-tag
     ] with-stream* ;
 
+: with-html-stream ( quot -- )
+    stdio get <html-stream> swap with-stream* ;
+
 : html-outliner ( caption contents -- )
     <table "display: inline; " =style table>
         <tr>
@@ -183,9 +186,6 @@ M: html-stream with-nested-stream ( quot style stream -- )
 
 M: html-stream stream-terpri [ <br/> ] with-stream* ;
 
-: with-html-stream ( quot -- )
-    stdio get <html-stream> swap with-stream* ;
-
 : default-css ( -- )
   <style>
     "A:link { text-decoration: none; color: black; }" print