}
if (defined $row[1] && $stattick != $row[1]){
$stattick = $row[1];
- $self->toTarget(members => "New tick: $stattick");
+ $self->toTarget(spam => "New tick: $stattick");
}
my $ircreqs = $dbh->prepare(q{SELECT id,username,message,channel FROM irc_requests NATURAL JOIN users WHERE not sent});
my $upircreq = $dbh->prepare(q{UPDATE irc_requests SET sent = TRUE WHERE id = ?});
};
after discord_message_create => sub {
- my $self = shift;
- my $hash = shift;
+ my ($self, $gw, $hash) = @_;
my $author = $hash->{author};
my $msg = $hash->{content};
my $c = NDIRC::DiscordContext->new({
discord_id => $author_name,
channel_id => $channel_id,
+ author_id => $author_id,
channel => $channel,
disp => $self->disp,
model => DB(),