From: Gurusamy Sarathy <gsar@cpan.org>
Date: Tue, 12 Sep 2000 17:24:29 +0000 (+0000)
Subject: change#6327 didn't quite go all the way to enable USE_SOCKETS_AS_HANDLES
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=862f1e8c450f143fb8997247930e40ce35542f7e;p=p5sagit%2Fp5-mst-13.2.git

change#6327 didn't quite go all the way to enable USE_SOCKETS_AS_HANDLES
initialization in all the threads on Windows

p4raw-link: @6327 on //depot/perl: 0401f8415cd90e2eed98f1f8939fbc02af4a0c74

p4raw-id: //depot/perl@7066
---

diff --git a/win32/win32.c b/win32/win32.c
index 9cc714f..67e8952 100644
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -4143,7 +4143,7 @@ Perl_sys_intern_dup(pTHX_ struct interp_intern *src, struct interp_intern *dst)
     Newz(1313, dst->children, 1, child_tab);
     dst->pseudo_id		= 0;
     Newz(1313, dst->pseudo_children, 1, child_tab);
-    dst->thr_intern.Winit_socktype = src->thr_intern.Winit_socktype;
+    dst->thr_intern.Winit_socktype = 0;
 }
 #  endif /* USE_ITHREADS */
 #endif /* HAVE_INTERP_INTERN */