Use 127.0.0.1 in nsm-tests

Winsock doesn't like "127.1"

* test/lisp/net/nsm-tests.el (nsm-check-local-subnet-ipv4): Spell
numeric localhost as "127.0.0.1" instead of "127.1".

diff --git a/test/lisp/net/nsm-tests.el b/test/lisp/net/nsm-tests.el
index bf6ac04b5270be31e9e64c8a51288069e8630f63..f3544370389965a3560dab1fa0c7d201c262d514 100644 (file)
--- a/test/lisp/net/nsm-tests.el
+++ b/test/lisp/net/nsm-tests.el
@@ -42,11 +42,11 @@
     (should-error (nsm-network-same-subnet local-ip wrong-length-mask remote-ip-yes))
     (should (eq nil (nsm-network-same-subnet local-ip wrong-mask remote-ip-yes)))
     (should (eq t (nsm-should-check "google.com")))
-    (should (eq t (nsm-should-check "127.1")))
+    (should (eq t (nsm-should-check "127.0.0.1")))
     (should (eq t (nsm-should-check "localhost")))
     (let ((nsm-trust-local-network t))
       (should (eq t (nsm-should-check "google.com")))
-      (should (eq nil (nsm-should-check "127.1")))
+      (should (eq nil (nsm-should-check "127.0.0.1")))
       (should (eq nil (nsm-should-check "localhost"))))))
 
 ;; FIXME This will never return true, since