diff options
author | Richard Levitte <levitte@openssl.org> | 2016-10-18 20:55:07 +0200 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2016-10-19 17:14:33 +0200 |
commit | e972273194303e15f8dd7ce69dbcfa27cc024e9f (patch) | |
tree | e6ef554b7e65f29d1b0910df98cff960ac28e9e6 /test/testlib | |
parent | 753663a9e5d3b105e713de45ae9704ce32fb01fb (diff) |
OpenSSL::Test - small fixup
Reviewed-by: Matt Caswell <matt@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/1686)
Diffstat (limited to 'test/testlib')
-rw-r--r-- | test/testlib/OpenSSL/Test.pm | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/test/testlib/OpenSSL/Test.pm b/test/testlib/OpenSSL/Test.pm index ffd287fbb6..4af3629c86 100644 --- a/test/testlib/OpenSSL/Test.pm +++ b/test/testlib/OpenSSL/Test.pm @@ -1016,14 +1016,9 @@ sub __fixup_prg { $prefix = ($prog =~ /^(?:[\$a-z0-9_]+:)?[<\[]/i ? "mcr " : "mcr []"); } - # We test both with and without extension. The reason - # is that we might be passed a complete file spec, with - # extension. + # We test if the program to use exists. if ( ! -x $prog ) { - my $prog = "$prog"; - if ( ! -x $prog ) { - $prog = undef; - } + $prog = undef; } if (defined($prog)) { |