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

use Symbol qw(delete_packge) -> use Symbol; Symbol::delete_package(). Maybe

Browse Source 
this helps with perl 5.004 not to crash at beginning, or maybe not :) Can't
test myself.


git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2823 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2002-05-26 14:36:44 +00:00 committed by cras
parent 933cbfe4b0
commit 6b7c38d1c6
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/perl/irssi-core.pl
View File

@ -6,14 +6,14 @@
# %%s : must be second - use Irssi; use Irssi::Irc; etc.. # %%s : must be second - use Irssi; use Irssi::Irc; etc..
package Irssi::Core; package Irssi::Core;
use Symbol qw(delete_package); use Symbol;
sub is_static { sub is_static {
return %d; return %d;
} }
sub destroy { sub destroy {
delete_package($_[0]); Symbol::delete_package($_[0]);
} }
sub eval_data { sub eval_data {