Fix undef warning
Dave Rolsky [Sat, 18 Sep 2010 04:01:18 +0000 (23:01 -0500)]
t/070_native_traits/300_array_subtypes.t

index 85d6dd3..20a312f 100644 (file)
@@ -10,7 +10,7 @@ use Test::Exception;
 
     subtype 'A1', as 'ArrayRef[Int]';
     subtype 'A2', as 'ArrayRef', where { @$_ < 2 };
-    subtype 'A3', as 'ArrayRef[Int]', where { sum(@$_) < 5 };
+    subtype 'A3', as 'ArrayRef[Int]', where { ( sum(@$_) || 0 ) < 5 };
 
     no Moose::Util::TypeConstraints;
 }