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
This commit is contained in:
Timo Sirainen 2001-07-16 20:22:45 +00:00 committed by cras
commit 69a6096b8b
8 changed files with 37 additions and 31 deletions

View file

@ -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()