Skip Menu |
 
rt.cpan.org will be shut down on March 1st, 2021.

This queue is for tickets about the Coat CPAN distribution.

Report information
The Basics
Id: 85440
Status: open
Priority: 0/
Queue: Coat

People
Owner: Nobody in particular
Requestors: HMBRAND [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: Critical
Broken in: (no value)
Fixed in: (no value)



Subject: for $foo qw( … ) { deprecated in 5.18.x
Download (untitled) / with headers
text/plain 133b
Fix your test (t/moose_tests/010_basics_015_buildargs.t # 27) foreach my $class qw(Foo Bar) { => foreach my $class (qw(Foo Bar)) {
The attached patch fixes this and also fixes up another test to get things working under 5.21.4.
Subject: open_R2lo1o4z.txt
Download open_R2lo1o4z.txt
text/plain 1.2k
diff -rup Coat-0.502-Lf3xY5-orig/t/002_always_strict_warnings.t Coat-0.502-Lf3xY5/t/002_always_strict_warnings.t --- Coat-0.502-Lf3xY5-orig/t/002_always_strict_warnings.t 2007-09-18 06:34:21.000000000 -0700 +++ Coat-0.502-Lf3xY5/t/002_always_strict_warnings.t 2014-09-21 23:17:18.000000000 -0700 @@ -9,7 +9,7 @@ use Test::More tests => 5; eval '$foo = 5;'; ::ok($@, '... got an error because strict is on'); - ::like($@, qr/Global symbol \"\$foo\" requires explicit package name at/, '... got the right error'); + ::like($@, qr/Global symbol \"\$foo\" requires explicit package name/, '... got the right error'); { my $warn; diff -rup Coat-0.502-Lf3xY5-orig/t/moose_tests/010_basics_015_buildargs.t Coat-0.502-Lf3xY5/t/moose_tests/010_basics_015_buildargs.t --- Coat-0.502-Lf3xY5-orig/t/moose_tests/010_basics_015_buildargs.t 2008-11-24 14:51:38.000000000 -0800 +++ Coat-0.502-Lf3xY5/t/moose_tests/010_basics_015_buildargs.t 2014-09-21 23:17:56.000000000 -0700 @@ -24,7 +24,7 @@ use Test::More tests => 14; extends qw(Foo); } -foreach my $class qw(Foo Bar) { +foreach my $class (qw(Foo Bar)) { is( $class->new->bar, undef, "no args" ); is( $class->new( bar => 42 )->bar, 42, "normal args" ); is( $class->new( 37 )->bar, 37, "single arg" );


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.