diff options
Diffstat (limited to 'scripts/autorejoin.pl')
-rw-r--r-- | scripts/autorejoin.pl | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/scripts/autorejoin.pl b/scripts/autorejoin.pl new file mode 100644 index 00000000..d49dac3f --- /dev/null +++ b/scripts/autorejoin.pl @@ -0,0 +1,20 @@ +# automatically rejoin to channel after kicked + +# NOTE: I personally don't like this feature, in most channels I'm in it +# will just result as ban. You've probably misunderstood the idea of /KICK +# if you kick/get kicked all the time "just for fun" ... + +use Irssi; + +sub event_rejoin_kick { + my ($data, $server) = @_; + my ($channel) = split(/ +/, $data); + + # check if channel has password + $chanrec = $server->channel_find($channel); + $password = $chanrec->values()->{'key'} if ($chanrec); + + $server->send_raw("JOIN $channel $password"); +} + +Irssi::signal_add('event kick', 'event_rejoin_kick'); |