Set the socket protocol family
Allows the use of an IPv6 nameserver
original commit: 312792ac4d
This commit is contained in:
parent
e128f02d8d
commit
1f8820eeaf
|
@ -288,7 +288,7 @@
|
||||||
|
|
||||||
(let* ([query (make-query (random 256) (string->bytes/latin-1 addr)
|
(let* ([query (make-query (random 256) (string->bytes/latin-1 addr)
|
||||||
type class)]
|
type class)]
|
||||||
[udp (udp-open-socket)]
|
[udp (udp-open-socket nameserver 53)]
|
||||||
[reply
|
[reply
|
||||||
(dynamic-wind
|
(dynamic-wind
|
||||||
void
|
void
|
||||||
|
|
Loading…
Reference in New Issue
Block a user