From c7da54b9ac5b6d954a1f01802a091093353aff8c Mon Sep 17 00:00:00 2001 From: dms Date: Thu, 1 Feb 2001 14:17:34 +0000 Subject: [PATCH] - getJoinChans, don't add _default - joinNextChan() - check nickServ_pass git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@295 c11ca15a-4712-0410-83d8-924469b57eb5 --- src/IRC/Irc.pl | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/src/IRC/Irc.pl b/src/IRC/Irc.pl index 7deecb5..b0b6834 100644 --- a/src/IRC/Irc.pl +++ b/src/IRC/Irc.pl @@ -319,6 +319,7 @@ sub dccsay { return ''; } + &status("=>$who<= $reply"); # dcc chat. $conn->privmsg($dcc{'CHAT'}{$who}, $reply); } @@ -498,7 +499,7 @@ sub joinNextChan { return; } - if ($nickserv < 1) { + if (&IsParam("nickServ_pass") and $nickserv < 1) { &WARN("jNC: nickserv/chanserv not up.") if (!$nickserv); $nickserv--; } @@ -617,8 +618,11 @@ sub getJoinChans { my @skip; foreach (keys %chanconf) { + next if ($_ eq "_default"); + my $val = $chanconf{$_}{autojoin}; my $skip = 0; + if (defined $val) { $skip++ if ($val eq "0"); } else { @@ -635,6 +639,8 @@ sub getJoinChans { if (scalar @skip) { &status("channels not auto-joining: @skip"); + } else { + &status("auto-joining all chans."); } return @chans; -- 2.39.2