File IO-Socket-SSL-1.16-certs.diff of Package perl-IO-Socket-SSL

--- t/core.t
+++ t/core.t
@@ -106,7 +106,7 @@
 	my ($ok, $ctx_store, $cert, $error) = @_;
 	unless ($ok && $ctx_store && $cert && !$error) 
 	{ print("not ok #client failure\n") && exit; }
-	($cert =~ /IO::Socket::SSL Test CA/) || print "not";
+	($cert =~ /IO::Socket::SSL Demo CA/) || print "not";
 	&ok("Client Verify-sub Check");
 	return 1;
     }
--- t/verify_hostname.t
+++ t/verify_hostname.t
@@ -53,7 +53,7 @@
 	ok( "client ssl connect" );
 
 	my $issuer = $client->peer_certificate( 'issuer' );
-	print "not " if $issuer !~m{IO::Socket::SSL Test CA};
+	print "not " if $issuer !~m{IO::Socket::SSL Demo CA};
 	ok("issuer");
 
 	my $cn = $client->peer_certificate( 'cn' );