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