Update Simple.pm to use disabled()

Reviewed-by: Richard Levitte <levitte@openssl.org>

diff --git a/test/testlib/OpenSSL/Test/Simple.pm b/test/testlib/OpenSSL/Test/Simple.pm
index 874a156f4ea3080a6d3d3db5607f881c4f0a3904..96500fcabaae8bddd4f303cf319735bf09a845d6 100644 (file)
--- a/test/testlib/OpenSSL/Test/Simple.pm
+++ b/test/testlib/OpenSSL/Test/Simple.pm
@@ -28,6 +28,7 @@ You could call them hacks if you wish.
 =cut
 
 use OpenSSL::Test;
 =cut
 
 use OpenSSL::Test;

+use OpenSSL::Test::Utils;

 
 =over 4
 
 
 =over 4
 


@@ -58,7 +59,7 @@ sub simple_test {
     plan tests => 1;
   SKIP: {
       skip "$algo is not supported by this OpenSSL build, skipping this test...", 1
     plan tests => 1;
   SKIP: {
       skip "$algo is not supported by this OpenSSL build, skipping this test...", 1

-         if $algo && run(app(["openssl", "no-$algo"]));
+         if $algo && disabled($algo);

 
       ok(run(test([$prgr])), "running $prgr");
     }
 
       ok(run(test([$prgr])), "running $prgr");
     }