correct call of http-error in MAKE-HOST-NAME-HANDLER
This commit is contained in:
parent
97f730075d
commit
453a7cdde6
|
@ -53,7 +53,7 @@
|
||||||
(let ((val (string-trim maybe-val)))
|
(let ((val (string-trim maybe-val)))
|
||||||
(or (string-ci=? hostname val)
|
(or (string-ci=? hostname val)
|
||||||
(string-prefix-ci? (string-append hostname ":") val)))
|
(string-prefix-ci? (string-append hostname ":") val)))
|
||||||
(http-error (status-code bad-request) "No Host: header"))))
|
(http-error (status-code bad-request) req "No Host: header"))))
|
||||||
handler default-handler))
|
handler default-handler))
|
||||||
|
|
||||||
;; selects handler according to path-prefix
|
;; selects handler according to path-prefix
|
||||||
|
|
Loading…
Reference in New Issue