X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=Delling.pm;h=41d87254ae6ea852db45c148504954f0e36398b2;hb=cf8fc5e52f53abda2b2372fb8c337710155f9525;hp=e04619015f4fdb8e8a5fafc39dfb79c75a5f7580;hpb=468a4e3e07c0d9e6ed66a75c73f0d7ff2921b90a;p=NDIRC.git diff --git a/Delling.pm b/Delling.pm index e046190..41d8725 100644 --- a/Delling.pm +++ b/Delling.pm @@ -103,7 +103,7 @@ WHERE u.hostmask = $1 AND channel = $2 AND flag IN ('o','v'); $irc->yield(mode => $channel, $mode, @who) if $mode; } - if (lc $channel ~~ lc $self->targets->{members}){ + if (lc $channel ~~ @{$self->targets->{members}}){ if (time - $last_announcement < 1){ $last_announcement = time; return; @@ -115,14 +115,14 @@ FROM users u WHERE hostmask = ? }, undef, $address); if ($user){ unless ($user->{password}) { - $irc->yield(privmsg => $self->targets->{members}, "$nick: Get a new random password with /msg delling !getpass . If you don't know your username, then you can get it with .points"); + $irc->yield(privmsg => $channel, "$nick: Get a new random password with /msg delling !getpass . If you don't know your username, then you can get it with .points"); } if ($tick > 12 && not defined $user->{pid}){ - $irc->yield(privmsg => $self->targets->{members}, "$nick: go to https://nd.ruin.nu/ and enter your coords."); + $irc->yield(privmsg => $channel, "$nick: go to https://nd.ruin.nu/ and enter your coords."); } if (not defined $user->{last_forum_visit}){ - $irc->yield(privmsg => $self->targets->{members}, "$nick: Go read the forum! https://nd.ruin.nu/forum"); + $irc->yield(privmsg => $channel, "$nick: Go read the forum! https://nd.ruin.nu/forum"); }else { my $unread = $dbh->selectrow_hashref(q{SELECT * FROM unread_posts($1)},undef,$user->{uid}); if ($unread && $unread->{new}){ @@ -183,7 +183,7 @@ sub refresh { while (my $req = $ircreqs->fetchrow_hashref){ if ($req->{channel} eq 'def'){ $self->toTarget(def => "## $req->{username} via webbie ## >> $req->{message}"); - #$self->parseCommand("~report_incs $req->{message}",$irc,$req->{username},' BATCH ',$disp->targets->{def},$dbh); + $self->parseCommand("~report_incs $req->{message}",$irc,$req->{username},' BATCH ','#def-ndawn',$dbh); }else{ $self->toTarget($req->{channel} => "<$req->{username} via webbie> $req->{message}"); }