1
0
Fork 0
mirror of https://github.com/perlbot/perlbuut synced 2025-06-07 16:35:40 -04:00

fixing karma plugin?

This commit is contained in:
Ryan Voots 2011-01-19 14:54:17 -05:00
parent 389220ef88
commit 782a77d183

View file

@ -21,6 +21,7 @@ sub {
);
my $lirc = l_irc($said->{body}) || lc $said->{body};
$lirc =~ s/^\s*(.*)\s*$/$1/;
warn "SUBJECT: $lirc";
my $karma = $dbh->selectrow_arrayref(
"SELECT sum(operation) FROM karma WHERE subject = ?",