scsh-conservatory
/
sunet
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

clean up dns lookup call

This commit is contained in:
interp 2002-08-27 13:48:30 +00:00
parent 013c7bd5b3
commit fd2d2bc79c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scheme/httpd/core.scm
View File

@ -327,7 +327,7 @@
fqdn-cache) fqdn-cache)
(begin (begin
(set! fqdn-cache (or (httpd-options-fqdn options) (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)))) (host-info:name (host-info addr))))
(set! used-addr addr) (set! used-addr addr)
(set! used-options options) (set! used-options options)