Fix ALPN - more fixes
[openssl.git] / test / recipes / 80-test_ssl.t
index ba57695b22f32314ce00955764365993dd9f0704..da32fac6c746da1090a3888ed6b8308189ecf648 100644 (file)
@@ -627,10 +627,10 @@ sub testssl {
     subtest 'ALPN tests' => sub {
        ######################################################################
 
     subtest 'ALPN tests' => sub {
        ######################################################################
 
-       plan tests => 12;
+       plan tests => 13;
 
       SKIP: {
 
       SKIP: {
-         skip "TLSv1.0 is not supported by this OpenSSL build", 12
+         skip "TLSv1.0 is not supported by this OpenSSL build", 13
              if $no_tls1;
 
          ok(run(test([@ssltest, "-bio_pair", "-tls1", "-alpn_client", "foo"])));
              if $no_tls1;
 
          ok(run(test([@ssltest, "-bio_pair", "-tls1", "-alpn_client", "foo"])));
@@ -658,6 +658,10 @@ sub testssl {
                       "-alpn_server1", "foo,123", "-sn_server1", "alice",
                       "-alpn_server2", "bar,456", "-sn_server2", "bob",
                       "-alpn_expected", "bar"])));
                       "-alpn_server1", "foo,123", "-sn_server1", "alice",
                       "-alpn_server2", "bar,456", "-sn_server2", "bob",
                       "-alpn_expected", "bar"])));
+         ok(run(test([@ssltest, "-bio_pair",
+                      "-alpn_client", "foo,bar", "-sn_client", "bob",
+                      "-alpn_server2", "bar,456", "-sn_server2", "bob",
+                      "-alpn_expected", "bar"])));
        }
     };
 
        }
     };