all new tests in place that must work with the (pending) update to Moose and MX:Types
[gitmo/MooseX-Types-Structured.git] / t / 03-dict.t
index 058d34c..1f4780e 100644 (file)
@@ -14,7 +14,7 @@ BEGIN {
        use MooseX::Types -declare => [qw(MyString)];
        
     subtype MyString,
-     as 'Str',
+     as Str,
      where { $_=~m/abc/};
         
     has 'dict' => (is=>'rw', isa=>Dict[name=>Str, age=>Int]);
@@ -95,4 +95,4 @@ lives_ok sub {
 throws_ok sub {
     $record->dict_with_tuple_with_union({key1=>1, key2=>['World',2]});
 }, qr/Attribute \(dict_with_tuple_with_union\) does not pass the type constraint/
- => 'Threw error on bad constraint';
\ No newline at end of file
+ => 'Threw error on bad constraint';