diff --git a/extra/http/http-tests.factor b/extra/http/http-tests.factor
index b5ed144579..a02382f083 100755
--- a/extra/http/http-tests.factor
+++ b/extra/http/http-tests.factor
@@ -125,7 +125,7 @@ USING: http.server http.server.static furnace.sessions furnace.alloy
 furnace.actions furnace.auth furnace.auth.login furnace.db http.client
 io.servers.connection io.files io io.encodings.ascii
 accessors namespaces threads
-http.server.responses http.server.redirection
+http.server.responses http.server.redirection furnace.redirection
 http.server.dispatchers db.tuples ;
 
 : add-quit-action
diff --git a/extra/http/server/server.factor b/extra/http/server/server.factor
index 0312e62e8d..21ab074907 100755
--- a/extra/http/server/server.factor
+++ b/extra/http/server/server.factor
@@ -144,5 +144,11 @@ M: http-server handle-client*
         "http" protocol-port >>insecure
         "https" protocol-port >>secure ;
 
+: httpd ( port -- )
+    <http-server>
+        swap >>insecure
+        f >>secure
+    start-server ;
+
 : http-insomniac ( -- )
     "http.server" { "httpd-hit" } schedule-insomniac ;