lib/PublicInbox/HTTP.pm | 4 ++-- lib/PublicInbox/HTTPD/Async.pm | 4 ++-- diff --git a/lib/PublicInbox/HTTP.pm b/lib/PublicInbox/HTTP.pm index 9497205488d4f5c1628470bbfe1312163deecaa2..c81aeacd172daf245c3101de98ab3c92be072f06 100644 --- a/lib/PublicInbox/HTTP.pm +++ b/lib/PublicInbox/HTTP.pm @@ -438,7 +438,7 @@ $self->close; } sub close { - my $self = shift; + my $self = $_[0]; if (my $env = delete $self->{env}) { delete $env->{'psgix.io'}; # prevent circular references } @@ -447,7 +447,7 @@ if (my $forward = delete $self->{forward}) { eval { $forward->close }; err($self, "forward ->close error: $@") if $@; } - $self->SUPER::close(@_); + $self->SUPER::close; # PublicInbox::DS::close } # for graceful shutdown in PublicInbox::Daemon: diff --git a/lib/PublicInbox/HTTPD/Async.pm b/lib/PublicInbox/HTTPD/Async.pm index bec4933712cf8d240638bfd4db7aa67c6fc970cb..e6df58eb5c348edabf2b106ecb01484133171202 100644 --- a/lib/PublicInbox/HTTPD/Async.pm +++ b/lib/PublicInbox/HTTPD/Async.pm @@ -80,9 +80,9 @@ sub event_step { $_[0]->{cb}->(@_) } sub close { - my $self = shift; + my $self = $_[0]; delete $self->{cb}; - $self->SUPER::close(@_); + $self->SUPER::close; # we defer this to the next timer loop since close is deferred if (my $cleanup = delete $self->{cleanup}) {