Simplify Simple.pm further, and make it more verbose

Reviewed-by: Stephen Henson <steve@openssl.org>

diff --git a/test/testlib/OpenSSL/Test/Simple.pm b/test/testlib/OpenSSL/Test/Simple.pm
index 0637e3dcccb13b9ca3b92194008bbae0b031bc84..dfae026014442869f6add412b4c72f65f468fe1e 100644 (file)
--- a/test/testlib/OpenSSL/Test/Simple.pm
+++ b/test/testlib/OpenSSL/Test/Simple.pm
@@ -56,13 +56,12 @@ sub simple_test {
 
     setup($name);
 
+    plan skip_all => "$algo is not supported by this OpenSSL build"
+        if $algo && disabled($algo);
+
     plan tests => 1;
-  SKIP: {
-      skip "$algo is not supported by this OpenSSL build, skipping this test...", 1
-         if $algo && disabled($algo);
 
-      ok(run(test([$prgr])), "running $prgr");
-    }
+    ok(run(test([$prgr])), "running $prgr");
 }
 
 =head1 SEE ALSO