web-redirect/temporary!
This commit is contained in:
parent
1eeb2ce59a
commit
3b376315f4
|
@ -57,10 +57,4 @@
|
|||
(during (http-listener $host-name $port)
|
||||
(assert (vh host-name port))
|
||||
(on (web-request-get (id req) (vh host-name port) ("" ()))
|
||||
(web-respond/bytes! id
|
||||
#:header (web-response-header
|
||||
#:code 303
|
||||
#:message #"Moved"
|
||||
#:headers (list (cons 'location "/index.html")
|
||||
(cons 'content-type "text/html")))
|
||||
#"<a href=\"/index.html\">Moved</a>"))))
|
||||
(web-redirect/temporary! id "/index.html"))))
|
||||
|
|
Loading…
Reference in New Issue