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 8e948d7cfb1ea263434847a05c3bffba96c6e34f
Author: Caleb Cushing <xenoterrac...@gmail.com>
Date:   Sat Aug 6 12:41:15 2011 -0500

    add copyright_holder to stopwords
    
    Signed-off-by: Caleb Cushing <xenoterrac...@gmail.com>
---
 lib/Dist/Zilla/Plugin/Test/PodSpelling.pm | 15 +++++++++++----
 1 file changed, 11 insertions(+), 4 deletions(-)

diff --git a/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm 
b/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm
index 28d2d4e..0ce7ccf 100644
--- a/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm
+++ b/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm
@@ -27,7 +27,11 @@ has spell_cmd => (
 has stopwords => (
     is      => 'ro',
     isa     => 'ArrayRef[Str]',
+       traits  => [ 'Array' ],
     default => sub { [] },                   # default to original
+       handles => {
+               push_stopwords => 'push',
+       }
 );
 
 around add_file => sub {
@@ -44,10 +48,13 @@ around add_file => sub {
         push @{ $self->stopwords }, /(\w{2,})/gxms;
     }
 
-       if ( $self->zilla->stash_named( 'copyright_holder' ) ) {
-               for ( split( ' ', $self->zilla->stash_named( 'copyright_holder' 
) ) ) {
-                       $self->log_debug( $_ );
-                       push @{ $self->stopwords };
+       if ( $self->zilla->copyright_holder ) {
+               for ( split( ' ', $self->zilla->copyright_holder ) ) {
+                       my ( $word ) = $_ =~ /(\w+)/xms;
+
+                       $self->log_debug( 'copyright_holder word: ' . $word );
+
+                       $self->push_stopwords( $word );
                }
        } else {
                $self->log_debug( 'no copyright_holder found' );

-- 
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

Reply via email to