summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLibravatar Janik Kleinhoff <ilbelkyr@shalture.org>2016-02-14 01:28:30 +0000
committerLibravatar Janik Kleinhoff <ilbelkyr@shalture.org>2016-02-14 01:28:30 +0000
commit2ef56bf45f2fb3726bb84773dbc692174c1fbd39 (patch)
tree51f7ac220edf3707f7a28fc22d2471d528b1f800
parentb94bc040e22560259f7f7ac0dd7a044edf4f6aa5 (diff)
downloadantispammeta-2ef56bf45f2fb3726bb84773dbc692174c1fbd39.tar.bz2
antispammeta-2ef56bf45f2fb3726bb84773dbc692174c1fbd39.tar.xz
antispammeta-2ef56bf45f2fb3726bb84773dbc692174c1fbd39.tar.zst
ASM::Event: handle +l like +j
-rw-r--r--lib/ASM/Event.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/ASM/Event.pm b/lib/ASM/Event.pm
index 4080c78..005a9d3 100644
--- a/lib/ASM/Event.pm
+++ b/lib/ASM/Event.pm
@@ -53,7 +53,8 @@ sub new
$conn->add_handler('quietlist', \&on_quietlist);
$conn->add_handler('pong', \&on_pong);
$conn->add_handler('channelurlis', \&on_channelurlis);
- $conn->add_handler('480', \&on_jointhrottled);
+ $conn->add_handler('480', \&on_jointhrottled); # +j
+ $conn->add_handler('471', \&on_jointhrottled); # +l
$conn->add_handler('servicesdown', \&on_servicesdown);
$conn->add_handler('endofbanlist', \&on_banlistend);
$conn->add_handler('quietlistend', \&on_quietlistend);
@@ -61,13 +62,12 @@ sub new
return $self;
}
-
sub on_jointhrottled
{
my ($conn, $event) = @_;
my $chan = $event->{args}->[1];
ASM::Util->dprint("$event->{nick}: $chan: $event->{args}->[2]", 'snotice');
- if ($event->{args}->[2] =~ /throttle exceeded, try again later/) {
+ if ($event->{args}->[2] =~ /try again later/) {
$conn->schedule(5, sub { $conn->join($chan); });
}
}