From 7a7e16751a91ab35ea007f2f4881937c625ddb2f Mon Sep 17 00:00:00 2001 From: Timothy Legge Date: Sun, 25 Feb 2024 20:07:50 -0400 Subject: [PATCH] testapp: use SSL_verify_mode to disable verification via config --- xt/testapp/lib/Saml2Test.pm | 15 ++++++++++++--- 1 file changed, 12 insertions(+), 3 deletions(-) diff --git a/xt/testapp/lib/Saml2Test.pm b/xt/testapp/lib/Saml2Test.pm index d2a7bfb..fb99d6d 100644 --- a/xt/testapp/lib/Saml2Test.pm +++ b/xt/testapp/lib/Saml2Test.pm @@ -269,7 +269,10 @@ get '/logout-soap' => sub { my $ua = LWP::UserAgent->new; require LWP::Protocol::https; - $ua->ssl_opts( (verify_hostname => config->{ssl_verify_hostname})); + $ua->ssl_opts( ( + SSL_verify_mode => config->{ssl_verify_hostname}, + verify_hostname => config->{ssl_verify_hostname}, + )); my $soap = Net::SAML2::Binding::SOAP->new( ua => $ua, @@ -428,7 +431,10 @@ any '/consumer-artifact' => sub { my $ua = LWP::UserAgent->new; require LWP::Protocol::https; - $ua->ssl_opts( (verify_hostname => config->{ssl_verify_hostname})); + $ua->ssl_opts( ( + SSL_verify_mode => config->{ssl_verify_hostname}, + verify_hostname => config->{ssl_verify_hostname}, + )); my $soap = Net::SAML2::Binding::SOAP->new( ua => $ua, @@ -555,7 +561,10 @@ any '/sls-consumer-artifact' => sub { my $ua = LWP::UserAgent->new; require LWP::Protocol::https; - $ua->ssl_opts( (verify_hostname => config->{ssl_verify_hostname})); + $ua->ssl_opts( ( + SSL_verify_mode => config->{ssl_verify_hostname}, + verify_hostname => config->{ssl_verify_hostname}, + )); my $soap = Net::SAML2::Binding::SOAP->new( ua => $ua,