[PATCH v2] git-send-email: use ! to indicate relative path to command
- From
Gregory Anders <greg@gpanders.com>
- Date
- May 11, 2021, 19:01 UTC
- Message-ID
- <20210511190101.22128-1-greg@gpanders.com>
When the smtpServer config option is prefixed with a ! character, the value of the option should be interpreted as a command to look up on PATH. ---
Fix the implementation to correctly find the absolute path for the given command, and report an error if the command is not found on PATH.
git-send-email.perl | 19 ++++++++++++++++++- 1 file changed, 18 insertions(+), 1 deletion(-)
diff --git a/git-send-email.perl b/git-send-email.perl index 175da07d94..6d10901595 100755 --- a/git-send-email.perl +++ b/git-send-email.perl @@ -1492,7 +1492,24 @@ sub send_message { if ($dry_run) { # We don't want to send the email. - } elsif (file_name_is_absolute($smtp_server)) { + } elsif (file_name_is_absolute($smtp_server) || $smtp_server =~ /^!/) { + if ($smtp_server =~ s/^!//) { + my $smtp_command; + my @progs = map {"$_/$smtp_server"} split /:/, $ENV{PATH}; + foreach (@progs) { + if (-x $_) { + $smtp_command = $_; + last; + } + } + + if (!defined $smtp_command) { + die __("The command $smtp_server was not found on PATH.") + } + + $smtp_server = $smtp_command; + } + my $pid = open my $sm, '|-'; defined $pid or die $!; if (!$pid) {
-- 2.31.1.576.g55f6e1c2f1