diff options
Diffstat (limited to 'lib/PublicInbox/LeiAuth.pm')
| -rw-r--r-- | lib/PublicInbox/LeiAuth.pm | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/lib/PublicInbox/LeiAuth.pm b/lib/PublicInbox/LeiAuth.pm index 9b09cecf..020dd125 100644 --- a/lib/PublicInbox/LeiAuth.pm +++ b/lib/PublicInbox/LeiAuth.pm @@ -1,8 +1,8 @@ -# Copyright (C) 2021 all contributors <meta@public-inbox.org> +# Copyright (C) all contributors <meta@public-inbox.org> # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt> # Authentication worker for anything that needs auth for read/write IMAP -# (eventually for read-only NNTP access) +# and read-only NNTP access # # timelines # lei-daemon | LeiAuth worker #0 | other WQ workers @@ -22,8 +22,7 @@ # | # call net_merge_all_done ->-> do per-WQ-class defined actions package PublicInbox::LeiAuth; -use strict; -use v5.10.1; +use v5.12; sub do_auth_atfork { # used by IPC WQ workers my ($self, $wq) = @_; @@ -57,7 +56,7 @@ sub net_merge_all { # called in wq worker via wq_broadcast # called by top-level lei-daemon when first worker is done with auth # passes updated net auth info to current workers sub net_merge_continue { - my ($wq, $lei, $net_new) = @_; + my ($lei, $wq, $net_new) = @_; $wq->{-net_new} = $net_new; # for "lei up" $wq->wq_broadcast('PublicInbox::LeiAuth::net_merge_all', $net_new); $wq->net_merge_all_done($lei); # defined per-WQ @@ -65,7 +64,7 @@ sub net_merge_continue { sub op_merge { # prepares PktOp->pair ops my ($self, $ops, $wq, $lei) = @_; - $ops->{net_merge_continue} = [ \&net_merge_continue, $wq, $lei ]; + $ops->{net_merge_continue} = [ \&net_merge_continue, $lei, $wq ]; } sub new { bless \(my $x), __PACKAGE__ } |