[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