diff options
author | Yorhel <git@yorhel.nl> | 2009-11-13 10:05:22 +0100 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2009-11-13 10:21:45 +0100 |
commit | 8053d00b0c9efa9bf1a7b176dcb8d9c106c1ee0d (patch) | |
tree | ade22d4bfec0f70b3561ef5fe22311e7a75536df /lib | |
parent | 511c34e3ae8cd9d0f836fc9c745b1011bc731863 (diff) |
Multi::IRC: Tweaked the idlequote timings
She shouldn't spam a quote more than once every 48 hours per channel now.
Also decreased the actual idle timeout, so that the channel doesn't have
to be idle for that long.
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Multi/IRC.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Multi/IRC.pm b/lib/Multi/IRC.pm index 462cd515..7d74ded7 100644 --- a/lib/Multi/IRC.pm +++ b/lib/Multi/IRC.pm @@ -249,8 +249,8 @@ sub command { # mask, dest, msg sub idlequote { for (keys %{$_[HEAP]{idlequotes}}) { next if --$_[HEAP]{idlequotes}{$_} > 0; - $_[KERNEL]->yield(cmd_quote => '', [$_]) if $_[HEAP]{idlequotes}{$_} == 0; - $_[HEAP]{idlequotes}{$_} = int(120+rand(600)); + $_[KERNEL]->yield(cmd_quote => '', [$_]) if $_[HEAP]{idlequotes}{$_} == 0 && !throttle $_[HEAP], "idlequote_$_", 48*3600; + $_[HEAP]{idlequotes}{$_} = int(60+rand(300)); } $_[KERNEL]->delay(idlequote => 60); } |