This is an automated email from the git hooks/post-receive script. abe pushed a commit to annotated tag 2.002005 in repository libdist-zilla-plugin-test-podspelling-perl.
commit 429453bc9206ae75d88a5d7512b4baf6dfe24613 Author: Caleb Cushing <xenoterrac...@gmail.com> Date: Wed Jun 27 13:56:20 2012 -0500 check for just content and content with line endings fix for bug in test with perl 5.8.8 Signed-off-by: Caleb Cushing <xenoterrac...@gmail.com> --- t/dashed.t | 21 +++++++++++++++++---- 1 file changed, 17 insertions(+), 4 deletions(-) diff --git a/t/dashed.t b/t/dashed.t index 0975082..5c14030 100644 --- a/t/dashed.t +++ b/t/dashed.t @@ -41,9 +41,22 @@ sub get_content { } my $content = get_content({}); -like $content, qr/^$fname $/xms, q[includes first name]; -like $content, qr/^$lname1$/xms, q[includes last name 1]; -like $content, qr/^$lname2$/xms, q[includes last name 2]; -unlike $content, qr/^$mi $/xms, q[doesnot include the midddle initial]; + +like $content, qr/$fname /xms, 'includes first name'; +like $content, qr/$lname1/xms, 'includes last name 1'; +like $content, qr/$lname2/xms, 'includes last name 2'; +unlike $content, qr/$mi /xms, 'does not include the midddle initial'; + +SKIP: { + use English '-no_match_Vars'; + skip 'qr//m does not work properly in 5.8.8', 4, + unless $PERL_VERSION gt v5.10 + ; + + like $content, qr/^$fname $/xms, q[includes first name]; + like $content, qr/^$lname1$/xms, q[includes last name 1]; + like $content, qr/^$lname2$/xms, q[includes last name 2]; + unlike $content, qr/^$mi $/xms, q[does not include the midddle initial]; +} done_testing; -- 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