From: Florian Ragwitz <rafl@debian.org>
Date: Sun, 19 Sep 2010 17:31:07 +0000 (+0200)
Subject: Don't rely on qw() providing PAREN tokens
X-Git-Tag: 1.14~2
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=94e4f66a14c5d8d9d926227da300e92edf0039fe;p=gitmo%2FMoose.git

Don't rely on qw() providing PAREN tokens
---

diff --git a/t/010_basics/015_buildargs.t b/t/010_basics/015_buildargs.t
index 0c4bf50..2071b3d 100644
--- a/t/010_basics/015_buildargs.t
+++ b/t/010_basics/015_buildargs.t
@@ -24,7 +24,7 @@ use Test::More;
     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" );