From: Gurusamy Sarathy <gsar@cpan.org>
Date: Wed, 4 Feb 1998 00:44:47 +0000 (+0000)
Subject: [win32] bug: win32_select() must StartSockets()
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f2bb5751a12fdd22e724ca263d4e207a6f6e123f;p=p5sagit%2Fp5-mst-13.2.git

[win32] bug: win32_select() must StartSockets()

p4raw-id: //depot/win32/perl@460
---

diff --git a/win32/win32sck.c b/win32/win32sck.c
index 5ac2ef6..8019cc3 100644
--- a/win32/win32sck.c
+++ b/win32/win32sck.c
@@ -269,6 +269,7 @@ win32_select(int nfds, Perl_fd_set* rd, Perl_fd_set* wr, Perl_fd_set* ex, const
     int i, fd, bit, offset;
     FD_SET nrd, nwr, nex, *prd, *pwr, *pex;
 
+    StartSockets();
     PERL_FD_ZERO(&dummy);
     if (!rd)
 	rd = &dummy, prd = NULL;