Fix a memory leak in the mem bio

[oweals/openssl.git] / test / recipes / 95-test_external_krb5.t

diff --git a/test/recipes/95-test_external_krb5.t b/test/recipes/95-test_external_krb5.t
index 8144003d895afd438d64c42c70acb157bed11c07..b4a54e52a5446378d70ed91a2aa85f4918173e0d 100644 (file)
--- a/test/recipes/95-test_external_krb5.t
+++ b/test/recipes/95-test_external_krb5.t
@@ -1,7 +1,7 @@
 #! /usr/bin/env perl
 # Copyright 2017 The OpenSSL Project Authors. All Rights Reserved.
 #
-# Licensed under the OpenSSL license (the "License").  You may not use
+# Licensed under the Apache License 2.0 (the "License").  You may not use
 # this file except in compliance with the License.  You can obtain a copy
 # in the file LICENSE in the source distribution or at
 # https://www.openssl.org/source/license.html
@@ -13,13 +13,11 @@ use OpenSSL::Test qw/:DEFAULT data_file srctop_file/;
 
 setup("test_external_krb5");
 
-plan tests => 1;
+plan skip_all => "No external tests in this configuration"
+    if disabled("external-tests");
+plan skip_all => "krb5 not available"
+    if ! -f srctop_file("krb5", "README");
 
-SKIP: {
-    skip "No external tests in this configuration"
-        if disabled("external-tests");
-    skip "krb5 not available", 1
-        if ! -f srctop_file("krb5", "README");
+plan tests => 1;
 
-    ok(run(cmd([data_file("krb5.sh")])), "running krb5 tests");
-}
+ok(run(cmd([data_file("krb5.sh")])), "running krb5 tests");