diff options
author | Timo Sirainen <cras@irssi.org> | 2002-08-25 15:49:12 +0000 |
---|---|---|
committer | cras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2002-08-25 15:49:12 +0000 |
commit | 7c92a2725616e50e032dd24005058a26605cb6e8 (patch) | |
tree | 14ab3bfb2473fbb25056a1bc4c12bfe391b49a8c | |
parent | 0f8a81fdb11fbffb6f06ae5aa34503deda37be75 (diff) | |
download | irssi-7c92a2725616e50e032dd24005058a26605cb6e8.zip |
better way to check if UNLOAD exists
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2883 dbcabf3a-b0e7-0310-adc4-f8d773084564
-rw-r--r-- | src/perl/irssi-core.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/perl/irssi-core.pl b/src/perl/irssi-core.pl index e103897a..f9cae269 100644 --- a/src/perl/irssi-core.pl +++ b/src/perl/irssi-core.pl @@ -13,7 +13,7 @@ sub is_static { } sub destroy { - eval { $_[0]->UNLOAD; }; + $_[0]->UNLOAD() if $_[0]->can('UNLOAD'); Symbol::delete_package($_[0]); } |