[libdist-zilla-plugin-test-podspelling-perl] 33/86: rename Dist

Axel Beckert abe at deuxchevaux.org
Mon May 25 10:02:05 UTC 2015


This is an automated email from the git hooks/post-receive script.

abe pushed a commit to annotated tag 2.001001
in repository libdist-zilla-plugin-test-podspelling-perl.

commit d2e536b62d9e4e1c689760dfaa4c0ec356ecee9a
Author: Caleb Cushing <xenoterracide at gmail.com>
Date:   Tue Aug 2 04:57:43 2011 -0500

    rename Dist
    
    Signed-off-by: Caleb Cushing <xenoterracide at gmail.com>
---
 dist.ini                                           |   2 +-
 lib/Dist/Zilla/Plugin/PodSpellingTests.pm          | 161 ++-------------------
 .../{PodSpellingTests.pm => Test/PodSpelling.pm}   |   2 +-
 3 files changed, 16 insertions(+), 149 deletions(-)

diff --git a/dist.ini b/dist.ini
index be6b985..2980636 100644
--- a/dist.ini
+++ b/dist.ini
@@ -1,4 +1,4 @@
-name = Dist-Zilla-Plugin-PodSpellingTests
+name = Dist-Zilla-Plugin-Test-PodSpelling
 author = Caleb Cushing <xenoterracide at gmail.com>
 author = Marcel Gruenauer <marcel at cpan.org>
 author = Harley Pig <harleypig at gmail.com>
diff --git a/lib/Dist/Zilla/Plugin/PodSpellingTests.pm b/lib/Dist/Zilla/Plugin/PodSpellingTests.pm
index 7133096..7db6611 100644
--- a/lib/Dist/Zilla/Plugin/PodSpellingTests.pm
+++ b/lib/Dist/Zilla/Plugin/PodSpellingTests.pm
@@ -1,163 +1,30 @@
+package Dist::Zilla::Plugin::PodSpellingTests;
 use 5.008;
 use strict;
 use warnings;
-
-package Dist::Zilla::Plugin::PodSpellingTests;
-
-# ABSTRACT: Release tests for POD spelling
+BEGIN {
+	our $VERSON = '1.112140';
+}
 use Moose;
-extends 'Dist::Zilla::Plugin::InlineFiles';
-with 'Dist::Zilla::Role::TextTemplate';
-sub mvp_multivalue_args { qw( stopwords ) }
-has wordlist => (
-    is      => 'ro',
-    isa     => 'Str',
-    default => 'Pod::Wordlist::hanekomu',    # default to original
-);
-has spell_cmd => (
-    is      => 'ro',
-    isa     => 'Str',
-    default => '',                           # default to original
-);
-has stopwords => (
-    is      => 'ro',
-    isa     => 'ArrayRef[Str]',
-    default => sub { [] },                   # default to original
-);
-around add_file => sub {
-    my ($orig, $self, $file) = @_;
-    my ($set_spell_cmd, $add_stopwords, $stopwords);
-    if ($self->spell_cmd) {
-        $set_spell_cmd = sprintf "set_spell_cmd('%s');", $self->spell_cmd;
-    }
+extends 'Dist::Zilla::Plugin::Test::PodSpelling';
 
-    # automatically add author names to stopwords
-    for (@{ $self->zilla->authors }) {
-        local $_ = $_;    # we don't want to modify $_ in-place
-        s/<.*?>//g;
-        push @{ $self->stopwords }, /(\w{2,})/g;
-    }
-    if (@{ $self->stopwords } > 0) {
-        $add_stopwords = 'add_stopwords(<DATA>);';
-        $stopwords = join "\n", '__DATA__', @{ $self->stopwords };
-    }
-    $self->$orig(
-        Dist::Zilla::File::InMemory->new(
-            {   name    => $file->name,
-                content => $self->fill_in_string(
-                    $file->content,
-                    {   wordlist      => \$self->wordlist,
-                        set_spell_cmd => \$set_spell_cmd,
-                        add_stopwords => \$add_stopwords,
-                        stopwords     => \$stopwords,
-                    },
-                ),
-            }
-        ),
-    );
+before register_component => sub {
+	warn "!!! [PodSpellingTests] is Deprecated. please use Test::Podspelling\n";
 };
-__PACKAGE__->meta->make_immutable;
-no Moose;
-1;
-
-=begin :prelude
-
-=for stopwords wordlist
 
-=for test_synopsis
+no Moose;
+__PACKAGE__->meta->make_immutable;
 1;
-__END__
 
-=end :prelude
+# ABSTRACT: (DEPRECATED) The old name of the PodSpelling plugin
 
 =head1 SYNOPSIS
 
-In C<dist.ini>:
-
-    [PodSpellingTests]
-
-or:
-
-    [PodSpellingTests]
-    wordlist = Pod::Wordlist
-    spell_cmd = aspell list
-    stopwords = CPAN
-    stopwords = github
-    stopwords = stopwords
-    stopwords = wordlist
-
-or, if you wanted to use my plugin bundle but just override this plugin's
-configuration:
-
-    [@Filter]
-    -bundle = @MARCEL
-    -remove = PodSpellingTests
-
-    [PodSpellingTests]
-    wordlist = Pod::Wordlist
-    spell_cmd = aspell list
-    stopwords = CPAN
-    stopwords = github
-    stopwords = stopwords
-    stopwords = wordlist
-
-=head1 DESCRIPTION
+This Plugin extends L<Dist::Zilla::Test::PodSpelling> and adds nothing. It is the old
+name for C<[Test::PodSpelling]> and will be removed in a few versions.
 
-This is an extension of L<Dist::Zilla::Plugin::InlineFiles>, providing
-the following file:
+=head1 SEE ALSO
 
-  xt/release/pod-spell.t - a standard Test::Spelling test
-
-=method wordlist
-
-The module name of a word list you wish to use that works with
-L<Test::Spelling>.
-
-Defaults to L<Pod::Wordlist::hanekomu>.
-
-=method spell_cmd
-
-If C<spell_cmd> is set then C<set_spell_cmd( your_spell_command );> is
-added to the test file to allow for custom spell check programs.
-
-Defaults to nothing.
-
-=method stopwords
-
-If stopwords is set then C<add_stopwords( E<lt>DATAE<gt> )> is added
-to the test file and the words are added after the C<__DATA__>
-section.
-
-C<stopwords> can appear multiple times, one word per line.
-
-Normally no stopwords are added by default, but author names appearing in
-C<dist.ini> are automatically added as stopwords so you don't have to add them
-manually just because they might appear in the C<AUTHORS> section of the
-generated POD document.
-
-=begin Pod::Coverage
-
-mvp_multivalue_args
-
-=end Pod::Coverage
+L<Dist::Zilla::Plugin::Test::PodSpelling>
 
 =cut
-__DATA__
-___[ xt/release/pod-spell.t ]___
-#!perl
-
-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 $@;
-
-{{ $set_spell_cmd }}
-{{ $add_stopwords }}
-all_pod_files_spelling_ok('lib');
-{{ $stopwords }}
-
diff --git a/lib/Dist/Zilla/Plugin/PodSpellingTests.pm b/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm
similarity index 98%
copy from lib/Dist/Zilla/Plugin/PodSpellingTests.pm
copy to lib/Dist/Zilla/Plugin/Test/PodSpelling.pm
index 7133096..f09bd12 100644
--- a/lib/Dist/Zilla/Plugin/PodSpellingTests.pm
+++ b/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm
@@ -2,7 +2,7 @@ use 5.008;
 use strict;
 use warnings;
 
-package Dist::Zilla::Plugin::PodSpellingTests;
+package Dist::Zilla::Plugin::Test::PodSpelling;
 
 # ABSTRACT: Release tests for POD spelling
 use Moose;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libdist-zilla-plugin-test-podspelling-perl.git



More information about the Pkg-perl-cvs-commits mailing list