[libnet-openid-common-perl] 04/09: no-op sub not needed

gregor herrmann gregoa at debian.org
Sun Feb 7 21:50:28 UTC 2016


This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to annotated tag v1.12
in repository libnet-openid-common-perl.

commit 83fa9b02960ddd7fc3b59eef5f7338a3eae4925f
Author: Roger Crew <crew at cs.stanford.edu>
Date:   Mon Oct 24 18:21:02 2011 -0700

    no-op sub not needed
---
 lib/Net/OpenID/Yadis.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Net/OpenID/Yadis.pm b/lib/Net/OpenID/Yadis.pm
index d6b7bc8..6f544ba 100644
--- a/lib/Net/OpenID/Yadis.pm
+++ b/lib/Net/OpenID/Yadis.pm
@@ -113,7 +113,7 @@ sub _get_contents {
     # if it's an HTML document, we are only ever looking at the headers, and
     # if it's a YADIS document, <body> elimination is not appropriate
     # (YADIS is not HTML; film at 11)
-    my $res = Net::OpenID::URIFetch->fetch($url, $self->consumer, sub {  } );
+    my $res = Net::OpenID::URIFetch->fetch($url, $self->consumer);
 
     if ($res) {
         $$final_url_ref = $res->final_uri;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libnet-openid-common-perl.git



More information about the Pkg-perl-cvs-commits mailing list