From 6e7394e67067d2c7cba26f958d6b35080de75cba Mon Sep 17 00:00:00 2001
From: Chris Andrews <chris@nodnol.org>
Date: Jan 13 2012 09:56:27 +0000
Subject: Provide proper context when looking for transforms.


---

diff --git a/lib/Net/SAML2/XML/Sig.pm b/lib/Net/SAML2/XML/Sig.pm
index ca053ad..265f499 100644
--- a/lib/Net/SAML2/XML/Sig.pm
+++ b/lib/Net/SAML2/XML/Sig.pm
@@ -161,8 +161,8 @@ sub verify {
     my $digest = _trim($self->{parser}->findvalue('//dsig:Signature/dsig:SignedInfo/dsig:Reference/dsig:DigestValue'));
     
     my $signed_xml    = $self->_get_signed_xml();
-    my $canonical     = $self->_transform( $signed_xml );
-    my $digest_bin    = sha1( $canonical ); 
+    my $canonical     = $self->_transform($signed_xml, $signature_node);
+    my $digest_bin    = sha1($canonical);
 
     return 1 if ($digest eq _trim(encode_base64($digest_bin)));
     return 0;