mehr pudding weniger bugs

17 years ago · b454fb16ed
parent ef1223d6a4
commit b454fb16ed
1 changed files with 7 additions and 4 deletions
--- a/3
+++ b/3
@ -71,10 +71,13 @@ sub on_msg {

    if ($nick ne $mynick && ($text =~ /pudding/ || $text =~ /brums/)) {
      print Dumper($event);
+      my $wait = 300;
+      if (time() > $conn->{lastpudding} + $wait) {
        sleep(rand(30));
        print "=> $conn->{channel}\n";
        $conn->privmsg($conn->{channel}, "$nick: " . pudding);
        $conn->{lastpudding} = time();
+      }
    } else {
      my $wait = 24 * 3600 * (0.5 + 0.5*rand());
      my (undef, undef, undef, undef, undef, undef, $wday) = localtime(time());