! 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 ;
M: vhost-rewrite call-responder*
dup url get sub-domain?
[ over param>> set-param child>> ] [ drop default>> ] if
- call-responder ;
\ No newline at end of file
+ call-responder ;