fix using list

db4
Doug Coleman 2009-08-03 17:32:56 -05:00
parent be0d134ebe
commit 5d19f868fb
1 changed files with 3 additions and 3 deletions

View File

@ -1,7 +1,7 @@
! Copyright (C) 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors http.server kernel namespaces sequences
splitting urls ;
USING: accessors http.server http.server.dispatchers kernel
namespaces sequences splitting urls ;
IN: http.server.rewrite
TUPLE: rewrite param child default ;
@ -30,4 +30,4 @@ TUPLE: vhost-rewrite suffix param child default ;
M: vhost-rewrite call-responder*
dup url get sub-domain?
[ over param>> set-param child>> ] [ drop default>> ] if
call-responder ;
call-responder ;