1
0
mirror of https://github.com/irssi/irssi.git synced 2024-12-04 14:46:39 -05:00

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
parent 3a2cc3b937
commit ead41669db

View File

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