diff options
author | Eric Wong <e@80x24.org> | 2021-10-19 09:33:37 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2021-10-19 17:29:15 +0000 |
commit | 8e91ad5eb95dff4070fa32242a59f373df8d9ff5 (patch) | |
tree | 748cbb4bf5f68964447e95a9f5969363da6016a7 | |
parent | b05caf7df04d7f8879a46e5c03693570351e2577 (diff) | |
download | public-inbox-8e91ad5eb95dff4070fa32242a59f373df8d9ff5.tar.gz |
This will help distinguish between mail outputs and external public-inboxes.
-rw-r--r-- | lib/PublicInbox/LeiUp.pm | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/lib/PublicInbox/LeiUp.pm b/lib/PublicInbox/LeiUp.pm index 39604177..c35b2e42 100644 --- a/lib/PublicInbox/LeiUp.pm +++ b/lib/PublicInbox/LeiUp.pm @@ -46,7 +46,7 @@ sub up1 ($$) { sub redispatch_all ($$) { my ($self, $lei) = @_; - my $upq = [ (@{$self->{local} // []}, @{$self->{remote} // []}) ]; + my $upq = [ (@{$self->{o_local} // []}, @{$self->{o_remote} // []}) ]; return up1($lei, $upq->[0]) if @$upq == 1; # just one, may start MUA # FIXME: this is also used per-query, see lei->_start_query @@ -81,12 +81,12 @@ sub lei_up { $lei->fail('--all and --mua= are incompatible'); @outs = PublicInbox::LeiSavedSearch::list($lei); if ($all eq 'local') { - $self->{local} = [ grep(!/$REMOTE_RE/, @outs) ]; + $self->{o_local} = [ grep(!/$REMOTE_RE/, @outs) ]; } elsif ($all eq 'remote') { - $self->{remote} = [ grep(/$REMOTE_RE/, @outs) ]; + $self->{o_remote} = [ grep(/$REMOTE_RE/, @outs) ]; } elsif ($all eq '') { - $self->{remote} = [ grep(/$REMOTE_RE/, @outs) ]; - $self->{local} = [ grep(!/$REMOTE_RE/, @outs) ]; + $self->{o_remote} = [ grep(/$REMOTE_RE/, @outs) ]; + $self->{o_local} = [ grep(!/$REMOTE_RE/, @outs) ]; } else { $lei->fail("only --all=$all not understood"); } @@ -94,16 +94,16 @@ sub lei_up { scalar(@outs) == 1 or die "BUG: lse set w/ >1 out[@outs]"; return up1($lei, $outs[0]); } else { - $self->{remote} = [ grep(/$REMOTE_RE/, @outs) ]; - $self->{local} = [ grep(!/$REMOTE_RE/, @outs) ]; + $self->{o_remote} = [ grep(/$REMOTE_RE/, @outs) ]; + $self->{o_local} = [ grep(!/$REMOTE_RE/, @outs) ]; } $lei->{lse} = $lei->_lei_store(1)->write_prepare($lei)->search; - ((@{$self->{local} // []} + @{$self->{remote} // []}) > 1 && + ((@{$self->{o_local} // []} + @{$self->{o_remote} // []}) > 1 && defined($opt->{mua})) and return $lei->fail(<<EOM); multiple outputs and --mua= are incompatible EOM - if ($self->{remote}) { # setup lei->{auth} - $self->prepare_inputs($lei, $self->{remote}) or return; + if ($self->{o_remote}) { # setup lei->{auth} + $self->prepare_inputs($lei, $self->{o_remote}) or return; } if ($lei->{auth}) { # start auth worker require PublicInbox::NetWriter; |