mirror of
https://github.com/openssl/openssl.git
synced 2024-11-21 01:15:20 +08:00
util/mknum.pl: Fix file opening
'or' has lower priority than '||' in perl, which affects evaluation order. Reviewed-by: Paul Dale <paul.dale@oracle.com> Reviewed-by: Matt Caswell <matt@openssl.org> (Merged from https://github.com/openssl/openssl/pull/12781)
This commit is contained in:
parent
c6029deab2
commit
83ecb26f2b
@ -54,7 +54,7 @@ $ordinals->invalidate();
|
||||
|
||||
foreach my $f (($symhacks_file // (), @ARGV)) {
|
||||
print STDERR $f," ","-" x (69 - length($f)),"\n" if $verbose;
|
||||
open IN, $f || die "Couldn't open $f: $!\n";
|
||||
open IN, $f or die "Couldn't open $f: $!\n";
|
||||
foreach (parse(<IN>, { filename => $f,
|
||||
warnings => $warnings,
|
||||
verbose => $verbose,
|
||||
|
Loading…
Reference in New Issue
Block a user