diff options
Diffstat (limited to 'miniperlmain.c')
| -rw-r--r-- | miniperlmain.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/miniperlmain.c b/miniperlmain.c index 5b075a52dd..b41c6ee62f 100644 --- a/miniperlmain.c +++ b/miniperlmain.c @@ -32,12 +32,12 @@ main(int argc, char **argv, char **env) perl_init_i18nl10n(1); - if (!do_undump) { + if (!PL_do_undump) { my_perl = perl_alloc(); if (!my_perl) exit(1); perl_construct( my_perl ); - perl_destruct_level = 0; + PL_perl_destruct_level = 0; } exitstatus = perl_parse( my_perl, xs_init, argc, argv, (char **) NULL ); |