X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fimmutable%2Fbuildargs.t;h=ee9c08cf2989095cf0448fb48b9e705596f1617f;hb=643a8b199e2ccc95a1337af41456a4711535b44f;hp=283ed5c739fb381bb91a138db1375e82ca65c28d;hpb=b06c3796081475bf8fac8de57a14616bf20310a4;p=gitmo%2FMoose.git diff --git a/t/immutable/buildargs.t b/t/immutable/buildargs.t index 283ed5c..ee9c08c 100644 --- a/t/immutable/buildargs.t +++ b/t/immutable/buildargs.t @@ -28,7 +28,7 @@ use Test::More; __PACKAGE__->meta->make_immutable; } -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" );