This is an automated email from the git hooks/post-receive script. abe pushed a commit to annotated tag 2.002002 in repository libdist-zilla-plugin-test-podspelling-perl.
commit d749d685333989fc0b178d4bf0f17004b88c4d10 Author: Caleb Cushing <xenoterrac...@gmail.com> Date: Wed Mar 7 12:16:28 2012 -0600 use Test::Requires and fix test Signed-off-by: Caleb Cushing <xenoterrac...@gmail.com> --- lib/Dist/Zilla/Plugin/Test/PodSpelling.pm | 18 ++++++------------ t/attributes.t | 6 +++--- 2 files changed, 9 insertions(+), 15 deletions(-) diff --git a/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm b/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm index b663bf7..3ec482e 100644 --- a/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm +++ b/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm @@ -163,22 +163,16 @@ mvp_multivalue_args =cut __DATA__ ___[ xt/author/pod-spell.t ]___ -#!perl - # This test is generated by Dist::Zilla::Plugin::Test::PodSpelling - +use strict; +use warnings; use Test::More; - -eval "use {{ $wordlist }}"; -plan skip_all => "{{ $wordlist }} required for testing POD spelling" - if $@; - -eval "use Test::Spelling 0.12"; -plan skip_all => "Test::Spelling 0.12 required for testing POD spelling" - if $@; +use Test::Requires { + 'Test::Spelling' => 0.12, + '{{ $wordlist }}' => 0, +}; {{ $set_spell_cmd }} {{ $add_stopwords }} all_pod_files_spelling_ok('bin', 'lib'); {{ $stopwords }} - diff --git a/t/attributes.t b/t/attributes.t index f3c22de..70f456c 100644 --- a/t/attributes.t +++ b/t/attributes.t @@ -37,14 +37,14 @@ sub get_content { } my $content = get_content({}); - like $content, qr/use Pod::Wordlist::hanekomu/, q[use default wordlist]; + like $content, qr/Pod::Wordlist::hanekomu/, q[use default wordlist]; unlike $content, qr/set_spell_cmd/, q[by default don't set spell command]; like $content, qr/add_stopwords/, q[by default we add stopwords]; like $content, qr/__DATA__\s$author/, q[DATA handle includes author]; $content = get_content({wordlist => 'Foo::Bar'}); -unlike $content, qr/use Pod::Wordlist::hanekomu/, q[custom word list]; - like $content, qr/use Foo::Bar/, q[custom word list]; +unlike $content, qr/Pod::Wordlist::hanekomu/, q[custom word list]; + like $content, qr/Foo::Bar/, q[custom word list]; $content = get_content({spell_cmd => 'all_wrong'}); like $content, qr/set_spell_cmd.+all_wrong/, q[custom spell checker]; -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libdist-zilla-plugin-test-podspelling-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