This is an automated email from the git hooks/post-receive script. gregoa pushed a commit to annotated tag v1.17 in repository libnet-openid-common-perl.
commit da73e5ac9bb08199ee0c1ba8cec45401cbbd7d7a Author: Roger Crew <c...@cs.stanford.edu> Date: Fri Apr 12 14:30:20 2013 -0700 add syntax checks, remove spurious 'my' declarations --- dist.ini | 3 +++ lib/Net/OpenID/Extension/SimpleRegistration.pm | 4 ++-- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/dist.ini b/dist.ini index 46bfcc9..71815e9 100644 --- a/dist.ini +++ b/dist.ini @@ -43,3 +43,6 @@ HTTP::Headers::Util = 0 [Prereqs / TestRequires] Test::More = 0 + +[ExtraTests] +[PodSyntaxTests] diff --git a/lib/Net/OpenID/Extension/SimpleRegistration.pm b/lib/Net/OpenID/Extension/SimpleRegistration.pm index 493b7e5..c85cfa1 100644 --- a/lib/Net/OpenID/Extension/SimpleRegistration.pm +++ b/lib/Net/OpenID/Extension/SimpleRegistration.pm @@ -59,7 +59,7 @@ sub received { my ($class, $args) = @_; my $self = $class->new(); - my $args = $args->{sreg} || {}; + $args = $args->{sreg} || {}; $self->required_fields($args->{required}); $self->optional_fields($args->{optional}); @@ -172,7 +172,7 @@ sub new { sub received { my ($class, $args) = @_; - my $args = $args->{sreg} || {}; + $args = $args->{sreg} || {}; my %opts = (); foreach my $field_name (@{FIELDS()}) { -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libnet-openid-common-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