This is an automated email from the git hooks/post-receive script. abe pushed a commit to annotated tag 1.000000-source in repository libdist-zilla-role-bootstrap-perl.
commit b47f32288a8922c32e9e790e958ce8cf7764b602 Author: Kent Fredric <kentfred...@gmail.com> Date: Sat Apr 5 17:35:51 2014 +1300 Variable name cleanup --- lib/Dist/Zilla/Role/Bootstrap.pm | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/lib/Dist/Zilla/Role/Bootstrap.pm b/lib/Dist/Zilla/Role/Bootstrap.pm index 0738a0d..37314a7 100644 --- a/lib/Dist/Zilla/Role/Bootstrap.pm +++ b/lib/Dist/Zilla/Role/Bootstrap.pm @@ -57,15 +57,16 @@ around 'dump_config' => sub { my ( $orig, $self, @args ) = @_; my $config = $self->$orig(@args); my $localconf = {}; - for my $var (qw( try_built try_built_method fallback distname )) { - my $pred = 'has_' . $var; + for my $attribute (qw( try_built try_built_method fallback distname )) { + my $pred = 'has_' . $attribute; if ( $self->can($pred) ) { next unless $self->$pred(); } - if ( $self->can($var) ) { - $localconf->{$var} = $self->$var(); + if ( $self->can($attribute) ) { + $localconf->{$attribute} = $self->$attribute(); } } + $config->{ q{} . __PACKAGE__ } = $localconf; return $config; }; @@ -289,7 +290,7 @@ Internal: Used to perform the final step of injecting library paths into C<@INC> =cut sub _add_inc { - my ( $self, $import ) = @_; + my ( undef, $import ) = @_; if ( not ref $import ) { require lib; return lib->import($import); -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libdist-zilla-role-bootstrap-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