diff options
author | Timo Sirainen <cras@irssi.org> | 2001-10-24 23:17:27 +0000 |
---|---|---|
committer | cras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2001-10-24 23:17:27 +0000 |
commit | ddf1b27c048d6cfa6e3733d3256634b66d6d4c25 (patch) | |
tree | 01a3e176ef436f109611fe8ed17f2851ef01bae4 /src/perl/irssi-core.pl | |
parent | bbd4b47306a58c65e63a898b291efd797758f034 (diff) | |
download | irssi-ddf1b27c048d6cfa6e3733d3256634b66d6d4c25.zip |
Added --with-perl-staticlib option to configure. If used, irssi's perl
libraries are compiled statically into irssi binary.
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1914 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/irssi-core.pl')
-rw-r--r-- | src/perl/irssi-core.pl | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/perl/irssi-core.pl b/src/perl/irssi-core.pl index 2a0fa57d..a63a723c 100644 --- a/src/perl/irssi-core.pl +++ b/src/perl/irssi-core.pl @@ -1,12 +1,17 @@ # NOTE: this is printed through printf()-like function, # so no extra percent characters. -# %%s can be used once, it contains the -# use Irssi; use Irssi::Irc; etc.. +# %%d : must be first - 1 if perl libraries are to be linked +# statically with irssi binary, 0 if not +# %%s : must be second - use Irssi; use Irssi::Irc; etc.. package Irssi::Core; use Symbol qw(delete_package); +sub is_static { + return %d; +} + sub destroy { my $package = "Irssi::Script::".$_[0]; delete_package($package); |