From b454fb16edf8fa5383137873ca0df9146f426743 Mon Sep 17 00:00:00 2001 From: puddingbrumsel Date: Sat, 23 Feb 2008 21:49:18 +0000 Subject: [PATCH] mehr pudding weniger bugs --- puddingbrumsel | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) diff --git a/puddingbrumsel b/puddingbrumsel index f4d0a50..be2367f 100644 --- a/puddingbrumsel +++ b/puddingbrumsel @@ -71,10 +71,13 @@ sub on_msg { if ($nick ne $mynick && ($text =~ /pudding/ || $text =~ /brums/)) { print Dumper($event); - sleep(rand(30)); - print "=> $conn->{channel}\n"; - $conn->privmsg($conn->{channel}, "$nick: " . pudding); - $conn->{lastpudding} = time(); + 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());