X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=miniperlmain.c;h=fb5cf1afe873d77f8881c396c65dc4fd474dff63;hb=11faa288e292c27cb2ddc4ccdc483b523d26ce19;hp=f7b24f45cc063908cd1074871a83cd9be686a6dd;hpb=51371543ca1a75ed152020ad0846b5b8cf11c32f;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/miniperlmain.c b/miniperlmain.c
index f7b24f4..fb5cf1a 100644
--- a/miniperlmain.c
+++ b/miniperlmain.c
@@ -38,7 +38,7 @@ main(int argc, char **argv, char **env)
 #undef PERLVARIC
 #endif
 
-    PERL_SYS_INIT(&argc,&argv);
+    PERL_SYS_INIT3(&argc,&argv,&env);
 
     if (!PL_do_undump) {
 	my_perl = perl_alloc();