diff options
author | Richard Levitte <levitte@openssl.org> | 2020-09-04 08:48:13 +0200 |
---|---|---|
committer | Matt Caswell <matt@openssl.org> | 2020-09-13 11:11:57 +0100 |
commit | 83ecb26f2b4246704ef900416d56942b86967304 (patch) | |
tree | 5696d43380f67bf02b6d72c514bf66e2ddbec5cf /util | |
parent | c6029deab2dba334874b17a9969b6c5fbbb7f96c (diff) | |
download | openssl-83ecb26f2b4246704ef900416d56942b86967304.tar.gz |
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)
Diffstat (limited to 'util')
-rw-r--r-- | util/mknum.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/util/mknum.pl b/util/mknum.pl index 871c07055b..4ee87c29a8 100644 --- a/util/mknum.pl +++ b/util/mknum.pl @@ -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, |