From: Eric Wong <e@80x24.org>
Date: Sun, 7 Feb 2021 10:40:02 +0000 (-0100)
Subject: lei q: fix arbitrary --mua command handling
X-Git-Tag: v1.7.0~1167
X-Git-Url: http://www.git.stargrave.org/?a=commitdiff_plain;ds=sidebyside;h=640fcb6c3b0961e24e170ba9591cfed4b8eb9b35;p=public-inbox.git

lei q: fix arbitrary --mua command handling

Perl doesn't seem to warn for shadowed variables, here :x
---

diff --git a/lib/PublicInbox/LEI.pm b/lib/PublicInbox/LEI.pm
index 31e6b4a8..dce80762 100644
--- a/lib/PublicInbox/LEI.pm
+++ b/lib/PublicInbox/LEI.pm
@@ -731,7 +731,7 @@ sub start_mua {
 	# TODO: help wanted: other common FOSS MUAs
 	} else {
 		require Text::ParseWords;
-		my @cmd = Text::ParseWords::shellwords($mua);
+		@cmd = Text::ParseWords::shellwords($mua);
 		# mutt uses '%f' for open-hook with compressed mbox, we follow
 		@cmd = map { $_ eq '%f' ? ($replaced = $mfolder) : $_ } @cmd;
 	}