Use perl_destruct_level, not PL_perl_destruct_level so that we're

compatible with older versions of perl.


git-svn-id: http://svn.irssi.org/repos/irssi/trunk@583 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2000-08-11 19:51:59 +00:00 committed by cras
commit ead41669db

View file

@ -573,7 +573,7 @@ void irssi_perl_init(void)
command_bind("perlflush", NULL, (SIGNAL_FUNC) cmd_flush);
signal_grabbed = siglast_grabbed = FALSE;
PL_perl_destruct_level = 1;
perl_destruct_level = 1;
irssi_perl_start();
irssi_perl_autorun();
}