In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/34edcf0c78a7b913c0990ed41d0772e27d7422e0?hp=01604df22e5410212145819f949c3f6ca82726d0>
- Log ----------------------------------------------------------------- commit 34edcf0c78a7b913c0990ed41d0772e27d7422e0 Author: Florian Ragwitz <[email protected]> Date: Sun Jul 25 14:30:03 2010 +0200 Ignore some more test byproducts M .gitignore commit 74bdedfd4eb4e4e235cabead69022ccc9ab96b19 Author: Florian Ragwitz <[email protected]> Date: Sun Jul 25 14:01:47 2010 +0200 Update B-Lint from version 1.11 to 1.12 M Porting/Maintainers.pl M cpan/B-Lint/lib/B/Lint.pm M cpan/B-Lint/lib/B/Lint/Debug.pm M cpan/B-Lint/t/lint.t ----------------------------------------------------------------------- Summary of changes: .gitignore | 3 +++ Porting/Maintainers.pl | 2 +- cpan/B-Lint/lib/B/Lint.pm | 4 ++-- cpan/B-Lint/lib/B/Lint/Debug.pm | 2 +- cpan/B-Lint/t/lint.t | 5 +++-- 5 files changed, 10 insertions(+), 6 deletions(-) diff --git a/.gitignore b/.gitignore index 3619d0a..bbc6389 100644 --- a/.gitignore +++ b/.gitignore @@ -100,6 +100,9 @@ t/tmp* t/perl t/test_state *.output +cpan/ExtUtils-MakeMaker/t/Big-Dummy/ +cpan/Module-Build/MB-* +*.tmp # t/op/require.t byproducts t/bleah.pm diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index 746074e..19b2cc4 100644 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -274,7 +274,7 @@ use File::Glob qw(:case); 'B::Lint' => { 'MAINTAINER' => 'jjore', - 'DISTRIBUTION' => 'JJORE/B-Lint-1.11.tar.gz', + 'DISTRIBUTION' => 'FLORA/B-Lint-1.12.tar.gz', 'FILES' => q[cpan/B-Lint], 'EXCLUDED' => [ qw( t/test.pl ) ], 'UPSTREAM' => undef, diff --git a/cpan/B-Lint/lib/B/Lint.pm b/cpan/B-Lint/lib/B/Lint.pm index b039215..9db07ea 100644 --- a/cpan/B-Lint/lib/B/Lint.pm +++ b/cpan/B-Lint/lib/B/Lint.pm @@ -1,6 +1,6 @@ package B::Lint; -our $VERSION = '1.11_01'; ## no critic +our $VERSION = '1.12'; ## no critic =head1 NAME @@ -626,7 +626,7 @@ UNDEFINED_SUBS: { no strict 'refs'; ## no critic strict if ( not exists &$subname ) { $subname =~ s/\Amain:://; - warning q[Nonexistant subroutine '%s' called], $subname; + warning q[Nonexistent subroutine '%s' called], $subname; } elsif ( not defined &$subname ) { $subname =~ s/\A\&?main:://; diff --git a/cpan/B-Lint/lib/B/Lint/Debug.pm b/cpan/B-Lint/lib/B/Lint/Debug.pm index 5929bb6..1a4bf31 100644 --- a/cpan/B-Lint/lib/B/Lint/Debug.pm +++ b/cpan/B-Lint/lib/B/Lint/Debug.pm @@ -1,6 +1,6 @@ package B::Lint::Debug; -our $VERSION = '0.01'; +our $VERSION = '1.12'; =head1 NAME diff --git a/cpan/B-Lint/t/lint.t b/cpan/B-Lint/t/lint.t index 0727114..7317b1d 100644 --- a/cpan/B-Lint/t/lint.t +++ b/cpan/B-Lint/t/lint.t @@ -10,6 +10,7 @@ BEGIN { } require 'test.pl'; } + use strict; use warnings; @@ -98,7 +99,7 @@ RESULT 'private-names (method)'; runlint 'undefined-subs', 'foo()', <<'RESULT'; -Nonexistant subroutine 'foo' called at -e line 1 +Nonexistent subroutine 'foo' called at -e line 1 RESULT runlint 'undefined-subs', 'foo();sub foo;', <<'RESULT'; @@ -126,7 +127,7 @@ RESULT # preloaded mdoules would register themselves with B::Lint. my $res = runperl( switches => ["-MB::Lint"], - prog => + prog => 'BEGIN{B::Lint->register_plugin(X=>[q[x]])};use O(qw[Lint x]);sub X::match{warn qq[X ok.\n]};dummy()', stderr => 1, ); -- Perl5 Master Repository
