diff options
-rw-r--r-- | apps/CA.pl.in | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/apps/CA.pl.in b/apps/CA.pl.in index 7087f55d27..f029470005 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' ) { |