X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=win32%2Fperllib.c;h=f38dfa1fd6c87dfd10938bdf14b6deed2b0eb4ed;hb=abec23e71b5d54dc73752d78864a1da13b1510e0;hp=4aeb7413dade134386cfe40ab183d57d355a35ce;hpb=eb160463266f58ba83ae9bb9ae8bbdc8f0c3027b;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/win32/perllib.c b/win32/perllib.c
index 4aeb741..f38dfa1 100644
--- a/win32/perllib.c
+++ b/win32/perllib.c
@@ -261,7 +261,7 @@ DllMain(HANDLE hModule,		/* DLL module handle */
             PerlIO_cleanup() was done here but fails (B).
          */     
 	EndSockets();
-#if defined(USE_5005THREADS) || defined(USE_ITHREADS)
+#if defined(USE_ITHREADS)
 	if (PL_curinterp)
 	    FREE_THREAD_KEY;
 #endif