dbDel takes a hash, dbm untested

[infobot.git] / src / IRC / Schedulers.pl

diff --git a/src/IRC/Schedulers.pl b/src/IRC/Schedulers.pl
index 18360d862814aa46bafc8513ad43cc1d7964a635..1de039f53e0c407d81f6e961ccc7a790f578bc7f 100644 (file)
--- a/src/IRC/Schedulers.pl
+++ b/src/IRC/Schedulers.pl
@@ -260,7 +260,7 @@ sub seenFlushOld {
        while (my @row = $sth->fetchrow_array) {
            my ($nick,$time) = @row;
 
-           &dbDel("seen","nick",$nick);
+           &dbDel("seen",{"nick"=>$nick});
            $delete++;
        }
        $sth->finish;