Remove duplicately applied patch shards.

[p5sagit/p5-mst-13.2.git] / perl.c

diff --git a/perl.c b/perl.c
index 89e6429..a2cfd78 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -1261,7 +1261,11 @@ print \"  \\@INC:\\n    @INC\\n\";");
 #endif
 
 #ifdef USE_SOCKS
+#   ifdef HAS_SOCKS5_INIT
+    socks5_init(argv[0]);
+#   else
     SOCKSinit(argv[0]);
+#   endif
 #endif    
 
     init_predump_symbols();