lei: ensure --stdin sets %ENV and $current_lei

--stdin usage means the current request can be delayed
indefinitely while other requests with different %ENV
come in.  So make sure our warnings and %ENV can match
non-stdin behavior.

This probably fix segfaults during process cleanup on OpenBSD
since _lei_atfork_child use non-localized assignment of
$current_lei.  But it could be another red herring.  Either way,
it's the right thing to do from an environment replication
perspective.

1 files changed, 3 insertions, 0 deletions

diff --git a/lib/PublicInbox/LeiInspect.pm b/lib/PublicInbox/LeiInspect.pm
index d1dca4ef..0455e739 100644
--- a/lib/PublicInbox/LeiInspect.pm
+++ b/lib/PublicInbox/LeiInspect.pm
@@ -255,6 +255,9 @@ sub ins_add { # InputPipe->consume callback
         my ($lei) = @_; # $_[1] = $rbuf
         if (defined $_[1]) {
                 $_[1] eq '' and return eval {
+                        $lei->fchdir;
+                        local %ENV = %{$lei->{env}};
+                        local $PublicInbox::LEI::current_lei = $lei;
                         my $str = delete $lei->{istr};
                         $str =~ s/\A[\r\n]*From [^\r\n]*\r?\n//s;
                         my $eml = PublicInbox::Eml->new(\$str);