Move stat tick output to command channel

diff --git a/Delling.pm b/Delling.pm
index 41d87254ae6ea852db45c148504954f0e36398b2..545df2fdc8aeaab7b886ac415422ad42ff4882da 100644 (file)
--- a/Delling.pm
+++ b/Delling.pm
@@ -175,7 +175,7 @@ sub refresh {
        }
        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 = ?});