From 2d22af21032993d641554e6157166cb2a3c6f57b Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Tue, 23 Feb 2021 03:38:22 +0600 Subject: lei: avoid needless env passing to subcommands We already localize %ENV before calling dispatch(), so it's needless overhead in spawn() to be checking env for undef values in those cases. --- lib/PublicInbox/LeiToMail.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/PublicInbox/LeiToMail.pm') diff --git a/lib/PublicInbox/LeiToMail.pm b/lib/PublicInbox/LeiToMail.pm index 4f8706e7..630da67c 100644 --- a/lib/PublicInbox/LeiToMail.pm +++ b/lib/PublicInbox/LeiToMail.pm @@ -218,7 +218,7 @@ sub _post_augment_mbox { # open a compressor process my $cmd = zsfx2cmd($zsfx, undef, $lei); my ($r, $w) = @{delete $lei->{zpipe}}; my $rdr = { 0 => $r, 1 => $lei->{1}, 2 => $lei->{2} }; - my $pid = spawn($cmd, $lei->{env}, $rdr); + my $pid = spawn($cmd, undef, $rdr); my $pp = gensym; my $dup = bless { "pid.$pid" => $cmd }, ref($lei); $dup->{$_} = $lei->{$_} for qw(2 sock); @@ -231,7 +231,7 @@ sub _post_augment_mbox { # open a compressor process sub decompress_src ($$$) { my ($in, $zsfx, $lei) = @_; my $cmd = zsfx2cmd($zsfx, 1, $lei); - popen_rd($cmd, $lei->{env}, { 0 => $in, 2 => $lei->{2} }); + popen_rd($cmd, undef, { 0 => $in, 2 => $lei->{2} }); } sub dup_src ($) { -- cgit v1.2.3-24-ge0c7