diff options
| author | Andy Polyakov <appro@openssl.org> | 2016-05-04 23:42:57 +0200 |
|---|---|---|
| committer | Andy Polyakov <appro@openssl.org> | 2016-05-06 09:44:50 +0200 |
| commit | 3732f12c668421b229eddcc1b3af2a4806ec9865 (patch) | |
| tree | 5a48d81acbb1b8b1f57ced387b206262dd6d057c /test | |
| parent | 9a2d2fb338d67d3001aebcb2aa8e11d0fd7d2f80 (diff) | |
testlib/OpenSSL/Test.pm: address 5.10 warnings.
Reviewed-by: Richard Levitte <levitte@openssl.org>
Diffstat (limited to 'test')
| -rw-r--r-- | test/testlib/OpenSSL/Test.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/test/testlib/OpenSSL/Test.pm b/test/testlib/OpenSSL/Test.pm index f2d0c9bee2..8a7d0a0ac9 100644 --- a/test/testlib/OpenSSL/Test.pm +++ b/test/testlib/OpenSSL/Test.pm @@ -735,8 +735,8 @@ sub __exeext { sub __test_file { BAIL_OUT("Must run setup() first") if (! $test_name); - my $f = pop . __exeext(); - $f = catfile($directories{BLDTEST},@_,$f); + my $f = pop; + $f = catfile($directories{BLDTEST},@_,$f . __exeext()); $f = catfile($directories{SRCTEST},@_,$f) unless -x $f; return $f; } @@ -753,8 +753,8 @@ sub __perltest_file { sub __apps_file { BAIL_OUT("Must run setup() first") if (! $test_name); - my $f = pop . __exeext(); - $f = catfile($directories{BLDAPPS},@_,$f); + my $f = pop; + $f = catfile($directories{BLDAPPS},@_,$f . __exeext()); $f = catfile($directories{SRCAPPS},@_,$f) unless -x $f; return $f; } |