pr8929
svn: r7609
This commit is contained in:
parent
96117cc86d
commit
2a91979a4b
|
@ -51,7 +51,7 @@
|
||||||
[struct responders
|
[struct responders
|
||||||
([servlet (url? any/c . -> . response?)]
|
([servlet (url? any/c . -> . response?)]
|
||||||
[servlet-loading (url? any/c . -> . response?)]
|
[servlet-loading (url? any/c . -> . response?)]
|
||||||
[authentication (url? (cons/c symbol? string?) . -> . response?)]
|
[authentication (url? header? . -> . response?)]
|
||||||
[servlets-refreshed (-> response?)]
|
[servlets-refreshed (-> response?)]
|
||||||
[passwords-refreshed (-> response?)]
|
[passwords-refreshed (-> response?)]
|
||||||
[file-not-found (request? . -> . response?)]
|
[file-not-found (request? . -> . response?)]
|
||||||
|
|
|
@ -122,5 +122,5 @@
|
||||||
conn
|
conn
|
||||||
(authentication-responder
|
(authentication-responder
|
||||||
uri
|
uri
|
||||||
`(WWW-Authenticate . ,(format " Basic realm=\"~a\"" realm)))
|
(make-header #"WWW-Authenticate" (string->bytes/utf-8 (format " Basic realm=\"~a\"" realm))))
|
||||||
method)))
|
method)))
|
Loading…
Reference in New Issue
Block a user