X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/e882e7a35673204397c295b6e92e66e3207a901e..6a28fa85a106cad64fdc157b375c9b448785fb31:/test/lisp/net/network-stream-tests.el

diff --git a/test/lisp/net/network-stream-tests.el b/test/lisp/net/network-stream-tests.el
index c9b7cc71b2..f30c92a1de 100644
--- a/test/lisp/net/network-stream-tests.el
+++ b/test/lisp/net/network-stream-tests.el
@@ -145,6 +145,7 @@
                                      :buffer (generate-new-buffer "*foo*")
                                      :host "localhost"
                                      :nowait t
+                                     :family 'ipv4
                                      :service port)))
     (should (eq (process-status proc) 'connect))
     (while (eq (process-status proc) 'connect)