Fix test

diff --git a/extra/furnace/sessions/sessions-tests.factor b/extra/furnace/sessions/sessions-tests.factor
index e203a6fd40643b1e71839d87fe289a5d6250513a..e959cae76a0ae933e96a50080eea45afc7873e7a 100755 (executable)
--- a/extra/furnace/sessions/sessions-tests.factor
+++ b/extra/furnace/sessions/sessions-tests.factor
@@ -1,7 +1,7 @@
 IN: furnace.sessions.tests\r
 USING: tools.test http furnace.sessions\r
 furnace.actions http.server http.server.responses\r
-math namespaces kernel accessors\r
+math namespaces kernel accessors io.sockets io.server\r
 prettyprint io.streams.string io.files splitting destructors\r
 sequences db db.tuples db.sqlite continuations urls math.parser\r
 furnace ;\r
@@ -56,6 +56,8 @@ M: foo call-responder*
     <request> init-request\r
     session ensure-table\r
 \r
+    "127.0.0.1" 1234 <inet4> remote-address set\r
+\r
     [ ] [\r
         <foo> <sessions>\r
         sessions set\r
@@ -63,7 +65,7 @@ M: foo call-responder*
 \r
     [\r
         [ ] [\r
-            empty-session\r
+           empty-session\r
                 123 >>id session set\r
         ] unit-test\r
 \r