diff options
author | Timo Sirainen <cras@irssi.org> | 2001-07-16 20:22:45 +0000 |
---|---|---|
committer | cras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2001-07-16 20:22:45 +0000 |
commit | 69a6096b8b4e0b94e3ba327801a120be2d446636 (patch) | |
tree | dd31da39c6a23514d8ade048fdef3426bfa4096f /scripts/autorejoin.pl | |
parent | 0d3b5c729f16a0c8c2d7ccbc04854de2e8b5b45a (diff) | |
download | irssi-69a6096b8b4e0b94e3ba327801a120be2d446636.zip |
added "use strict" for all scripts, made some small changes.
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1639 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'scripts/autorejoin.pl')
-rw-r--r-- | scripts/autorejoin.pl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/scripts/autorejoin.pl b/scripts/autorejoin.pl index 75bac90d..bbbb0ed8 100644 --- a/scripts/autorejoin.pl +++ b/scripts/autorejoin.pl @@ -6,6 +6,7 @@ use Irssi; use Irssi::Irc; +use strict; sub event_rejoin_kick { my ($server, $data) = @_; @@ -14,8 +15,8 @@ sub event_rejoin_kick { return if ($server->{nick} ne $nick); # check if channel has password - $chanrec = $server->channel_find($channel); - $password = $chanrec->{key} if ($chanrec); + my $chanrec = $server->channel_find($channel); + my $password = $chanrec->{key} if ($chanrec); # We have to use send_raw() because the channel record still # exists and irssi won't even try to join to it with command() |