This is an automated email from the git hooks/post-receive script. dmn pushed a commit to branch master in repository libnet-openid-consumer-perl.
commit 7b393085cc035fe7e134a66f37b31684c78b0607 Author: Dominic Hargreaves <d...@earth.li> Date: Sun Dec 30 14:19:11 2007 +0000 Update to 0.14 --- ChangeLog | 5 +++++ MANIFEST | 1 + META.yml | 2 +- debian/changelog | 7 +++++++ debian/control | 2 +- lib/Net/OpenID/Consumer.pm | 4 ++-- t/01-misc.t | 22 ++++++++++++++++++++++ 7 files changed, 39 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index 26cfde5..64a8e15 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +0.14: (2007-08-03) + + * allow CGI subclasses (like CGI::Fast) for args. bug fix + from Chris Kastorff <encryp...@gmail.com>. + 0.13: * work-around bug in some openid servers that don't escape "+". so treat a space as a +. (from Thomas Sibley diff --git a/MANIFEST b/MANIFEST index 594f7d1..2b04e47 100644 --- a/MANIFEST +++ b/MANIFEST @@ -6,4 +6,5 @@ lib/Net/OpenID/VerifiedIdentity.pm lib/Net/OpenID/ClaimedIdentity.pm lib/Net/OpenID/Association.pm t/00-use.t +t/01-misc.t META.yml Module meta-data (added by MakeMaker) diff --git a/META.yml b/META.yml index 1cd3cd0..8fdf095 100644 --- a/META.yml +++ b/META.yml @@ -1,7 +1,7 @@ # http://module-build.sourceforge.net/META-spec.html #XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX# name: Net-OpenID-Consumer -version: 0.13 +version: 0.14 version_from: lib/Net/OpenID/Consumer.pm installdirs: site requires: diff --git a/debian/changelog b/debian/changelog index 0395275..2ead473 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,10 @@ +libnet-openid-consumer-perl (0.14-1) unstable; urgency=low + + * New upstream release + * Update Standards-Version (no changes) + + -- Dominic Hargreaves <d...@earth.li> Sun, 30 Dec 2007 14:19:48 +0000 + libnet-openid-consumer-perl (0.13-1) unstable; urgency=low * New upstream release diff --git a/debian/control b/debian/control index 6804baa..417bcc3 100644 --- a/debian/control +++ b/debian/control @@ -4,7 +4,7 @@ Priority: optional Build-Depends: debhelper (>= 4.0.2) Build-Depends-Indep: perl (>= 5.8.0-7), libwww-perl, libdigest-sha1-perl, libmime-perl, liburi-perl, libcrypt-dh-perl (>= 0.05), liburi-fetch-perl (>= 0.02) Maintainer: Dominic Hargreaves <d...@earth.li> -Standards-Version: 3.7.2 +Standards-Version: 3.7.3 Package: libnet-openid-consumer-perl Architecture: all diff --git a/lib/Net/OpenID/Consumer.pm b/lib/Net/OpenID/Consumer.pm index 13bc0a4..ca6ae45 100644 --- a/lib/Net/OpenID/Consumer.pm +++ b/lib/Net/OpenID/Consumer.pm @@ -9,7 +9,7 @@ use URI::Fetch 0.02; package Net::OpenID::Consumer; use vars qw($VERSION); -$VERSION = "0.13"; +$VERSION = "0.14"; use fields ( 'cache', # the Cache object sent to URI::Fetch @@ -97,7 +97,7 @@ sub args { return $self->{args}->($what); } elsif (ref $what eq "HASH") { $getter = sub { $what->{$_[0]}; }; - } elsif (ref $what eq "CGI") { + } elsif (UNIVERSAL::isa($what, "CGI")) { $getter = sub { scalar $what->param($_[0]); }; } elsif (ref $what eq "Apache") { my %get = $what->args; diff --git a/t/01-misc.t b/t/01-misc.t new file mode 100644 index 0000000..b807ebd --- /dev/null +++ b/t/01-misc.t @@ -0,0 +1,22 @@ +#!/usr/bin/perl + +use strict; +use Test::More tests => 2; +use Net::OpenID::Consumer; + +my $csr = Net::OpenID::Consumer->new; +ok($csr, "instantiated"); +ok($csr->args(CGI::Subclass->new), "can set CGI subclass as args"); + +package CGI; +no warnings 'redefine'; + +sub new { + my ($class) = @_; + return bless {}, $class; +} + +package CGI::Subclass; +use base 'CGI'; + +1; -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libnet-openid-consumer-perl.git _______________________________________________ Pkg-perl-cvs-commits mailing list Pkg-perl-cvs-commits@lists.alioth.debian.org http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits