net.adns: Log the DNS server that a query is sent to

diff --git a/net/adns.lua b/net/adns.lua
index 2f7b680458bf36e82de0d50ea3ba8a24f945d504..a3b07b09dc9b7ca4e87a5a4b495c3767f458c42c 100644 (file)
--- a/net/adns.lua
+++ b/net/adns.lua
@@ -78,7 +78,10 @@ function new_async_socket(sock, resolver)
        handler.setpeername = function (_, ...) peername = (...); local ret = sock:setpeername(...); _:set_send(dummy_send); return ret; end
        handler.connect = function (_, ...) return sock:connect(...) end
        --handler.send = function (_, data) _:write(data);  return _.sendbuffer and _.sendbuffer(); end
-       handler.send = function (_, data) return sock:send(data); end
+       handler.send = function (_, data)
+               log("debug", "Sending DNS query to %s", sock:getpeername());
+               return sock:send(data);
+       end
        return handler;
 end