[Bast-commits] r9803 - Class-Accessor-Grouped/trunk/t

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2010-11-27 15:46:12 +0000 (Sat, 27 Nov 2010)
New Revision: 9803

Modified:
   Class-Accessor-Grouped/trunk/t/accessors_xs_cachedwarn.t
Log:
Stupid test syntax errors

Modified: Class-Accessor-Grouped/trunk/t/accessors_xs_cachedwarn.t
===================================================================
--- Class-Accessor-Grouped/trunk/t/accessors_xs_cachedwarn.t	2010-11-27 15:45:08 UTC (rev 9802)
+++ Class-Accessor-Grouped/trunk/t/accessors_xs_cachedwarn.t	2010-11-27 15:46:12 UTC (rev 9803)
@@ -34,8 +34,8 @@
 
 is (
   scalar (grep { $_ =~ /^\QDeferred version of method AccessorGroups::singlefield invoked more than once/ } @w),
-  3
-  '3 warnings produced as expected on cached invocation during testing'
+  3,
+  '3 warnings produced as expected on cached invocation during testing',
 );
 
 done_testing;