use dns-lookup-ip before using host-info for fqdn

This commit is contained in:
interp 2002-08-23 15:41:06 +00:00
parent 1f0a3e6c1b
commit ed4ad0798f
2 changed files with 2 additions and 0 deletions

View File

@ -421,6 +421,7 @@ the requested method (~A).~%"
(or *fqdn-cache*
(begin
(set! *fqdn-cache* (or (httpd-options-fqdn options)
(dns-lookup-ip addr)
(host-info:name (host-info addr))))
*fqdn-cache*)))

View File

@ -646,6 +646,7 @@
format-net ; format-internet-host-address
rate-limit ; rate-limiting stuff
string-lib ; STRING-INDEX
dns ; dns-lookup-ip
handle-fatal-error
httpd-read-options