From f49b42e6eec9b7abee940a10e8e1125edcb61481 Mon Sep 17 00:00:00 2001 From: Richard Levitte Date: Tue, 22 Jun 2021 10:52:09 +0200 Subject: [PATCH] apps/CA.pl.in: restore the quotes around -CAfile, they were there for a reason Reviewed-by: Paul Dale (Merged from https://github.com/openssl/openssl/pull/15823) --- apps/CA.pl.in | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/apps/CA.pl.in b/apps/CA.pl.in index 7087f55d278..f029470005d 100644 --- a/apps/CA.pl.in +++ b/apps/CA.pl.in @@ -209,7 +209,9 @@ if ($WHAT eq '-newcert' ) { } elsif ($WHAT eq '-verify' ) { my @files = @ARGV ? @ARGV : ( $NEWCERT ); foreach my $file (@files) { - my $status = run("$VERIFY -CAfile ${CATOP}/$CACERT $file $EXTRA{verify}"); + # -CAfile quoted for VMS, since the C RTL downcases all unquoted + # arguments to C programs + my $status = run("$VERIFY \"-CAfile\" ${CATOP}/$CACERT $file $EXTRA{verify}"); $RET = $status if $status != 0; } } elsif ($WHAT eq '-crl' ) { -- 2.47.3