furnace.actions: return Method Not Allowed if not GET/HEAD/POST.
parent
a9f8424302
commit
2bb93f1b72
|
@ -96,6 +96,7 @@ M: action call-responder* ( path action -- response )
|
||||||
{ "GET" [ handle-get ] }
|
{ "GET" [ handle-get ] }
|
||||||
{ "HEAD" [ handle-get ] }
|
{ "HEAD" [ handle-get ] }
|
||||||
{ "POST" [ handle-post ] }
|
{ "POST" [ handle-post ] }
|
||||||
|
[ 2drop <405> ]
|
||||||
} case ;
|
} case ;
|
||||||
|
|
||||||
M: action modify-form
|
M: action modify-form
|
||||||
|
|
|
@ -36,11 +36,14 @@ IN: http.server.responses
|
||||||
: <304> ( -- response )
|
: <304> ( -- response )
|
||||||
304 "Not modified" <trivial-response> ;
|
304 "Not modified" <trivial-response> ;
|
||||||
|
|
||||||
: <403> ( -- response )
|
|
||||||
403 "Forbidden" <trivial-response> ;
|
|
||||||
|
|
||||||
: <400> ( -- response )
|
: <400> ( -- response )
|
||||||
400 "Bad request" <trivial-response> ;
|
400 "Bad request" <trivial-response> ;
|
||||||
|
|
||||||
|
: <403> ( -- response )
|
||||||
|
403 "Forbidden" <trivial-response> ;
|
||||||
|
|
||||||
: <404> ( -- response )
|
: <404> ( -- response )
|
||||||
404 "Not found" <trivial-response> ;
|
404 "Not found" <trivial-response> ;
|
||||||
|
|
||||||
|
: <405> ( -- response )
|
||||||
|
405 "Method Not Allowed" <trivial-response> ;
|
||||||
|
|
Loading…
Reference in New Issue