(Fopen_network_stream)[WINDOWSNT]: Ensure Windows

socket library is loaded if available.

diff --git a/src/process.c b/src/process.c
index a5eba6c9f17e30458de0a5e568469470664106b0..8e53378426062e3dde532857b2d89350558a96ee 100644 (file)
--- a/src/process.c
+++ b/src/process.c
@@ -1634,6 +1634,11 @@ Fourth arg SERVICE is name of the service desired, or an integer\n\
   int retry = 0;
   int count = specpdl_ptr - specpdl;
 
+#ifdef WINDOWSNT
+  /* Ensure socket support is loaded if available. */
+  init_winsock (TRUE);
+#endif
+
   GCPRO4 (name, buffer, host, service);
   CHECK_STRING (name, 0);
   CHECK_STRING (host, 0);