From 5831b53520579aaffff3af7c46b4d997b1cb7382 Mon Sep 17 00:00:00 2001
From: Chris Andrews <chrisandrews@venda.com>
Date: Feb 28 2011 08:08:00 +0000
Subject: Fix occasional time-based test failure.


---

diff --git a/t/05-soap-binding.t b/t/05-soap-binding.t
index 65d21ab..2b0c42c 100644
--- a/t/05-soap-binding.t
+++ b/t/05-soap-binding.t
@@ -31,14 +31,16 @@ my $session = 'session-to-log-out';
 
 my $request = $sp->logout_request(
         $idp->entityid, $nameid, $session,
-)->as_xml;
+);
 ok($request);
+my $request_xml = $request->as_xml;
+ok($request_xml);
 
 my $ua = LWP::UserAgent->new; # not used
 my $soap = $sp->soap_binding($ua, $slo_url, $idp_cert);
 ok($soap);
 
-my $soap_req = $soap->create_soap_envelope($request);
+my $soap_req = $soap->create_soap_envelope($request_xml);
 ok($soap_req);
 
 my ($subject, $xml) = $soap->handle_request($soap_req);
@@ -49,6 +51,8 @@ my $soaped_request = Net::SAML2::Protocol::LogoutRequest->new_from_xml(
         xml => $xml
 );
 ok($soaped_request);
-ok($request eq $soaped_request->as_xml);
+isa_ok($soaped_request, 'Net::SAML2::Protocol::LogoutRequest');
+ok($soaped_request->session eq $request->session);
+ok($soaped_request->nameid eq $request->nameid);
 
 done_testing;