clean up dns lookup call
This commit is contained in:
parent
013c7bd5b3
commit
fd2d2bc79c
|
@ -327,7 +327,7 @@
|
|||
fqdn-cache)
|
||||
(begin
|
||||
(set! fqdn-cache (or (httpd-options-fqdn options)
|
||||
(dns-lookup-ip (socket-address->string addr))
|
||||
(dns-lookup-ip (socket-address->string addr #f))
|
||||
(host-info:name (host-info addr))))
|
||||
(set! used-addr addr)
|
||||
(set! used-options options)
|
||||
|
|
Loading…
Reference in New Issue