if ($chan =~ /^(.*):(.*)$/){
$chan = $1;
$self->targets->{$2} = [] unless exists $self->targets->{$2};
- push @{$self->targets->{$2}},$chan;
+ push @{$self->targets->{$2}},lc $chan;
say "$2 - @{$self->targets->{$2}}";
}
$disp->add_channel($chan,\@types);
my ($self, $msg, @targets) = @_;
for (@targets) {
- when (/^D-(\d+)$/) {
+ when (/^D-(\d+)$/i) {
$self->discordMessage($1, $msg);
}
default {
$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;
}, 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}){