Use number->status-code to generate status-code from the code returned
in the CGI header.
This commit is contained in:
parent
06121b3972
commit
7170593056
|
@ -264,7 +264,7 @@
|
||||||
(make-redirect-response (string-trim loc)))
|
(make-redirect-response (string-trim loc)))
|
||||||
;; Send the response header back to the client
|
;; Send the response header back to the client
|
||||||
(make-response ;code message seconds mime extras body
|
(make-response ;code message seconds mime extras body
|
||||||
(car stat) ; code
|
(number->status-code (car stat))
|
||||||
(cdr stat) ; text
|
(cdr stat) ; text
|
||||||
(time)
|
(time)
|
||||||
ctype
|
ctype
|
||||||
|
|
Loading…
Reference in New Issue