[libdist-zilla-plugin-test-podspelling-perl] 09/13: make unicode fix compat with 5.10

Axel Beckert abe at deuxchevaux.org
Mon May 25 10:03:47 UTC 2015


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

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

commit cdb99e0392b9b58b622a1531b59fedbfea417b9f
Author: Caleb Cushing <xenoterracide at gmail.com>
Date:   Thu Feb 14 20:09:36 2013 -0600

    make unicode fix compat with 5.10
    
    Signed-off-by: Caleb Cushing <xenoterracide at gmail.com>
---
 lib/Dist/Zilla/Plugin/Test/PodSpelling.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm b/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm
index c884554..d2b25d0 100644
--- a/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm
+++ b/lib/Dist/Zilla/Plugin/Test/PodSpelling.pm
@@ -1,5 +1,5 @@
 package Dist::Zilla::Plugin::Test::PodSpelling;
-use 5.014;
+use 5.010;
 use strict;
 use warnings;
 
@@ -56,7 +56,7 @@ sub add_stopword {
 
 	$self->log_debug( 'attempting stopwords extraction from: ' . $data );
 	# words must be greater than 2 characters
-	my ( $word ) = $data =~ /(\w{2,})/uxms;
+	my ( $word ) = $data =~ /(\p{Word}{2,})/xms;
 
 	# log won't like an undef
 	return unless $word;
@@ -74,7 +74,7 @@ around add_file => sub {
 		$set_spell_cmd = sprintf "set_spell_cmd('%s');", $self->spell_cmd;
 	}
 
-	foreach my $holder ( split( /\s/uxms, join( ' ',
+	foreach my $holder ( split( /\s/xms, join( ' ',
 			@{ $self->zilla->authors },
 			$self->zilla->copyright_holder,
 		))

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