Fix a warning
Florian Ragwitz [Tue, 1 Jun 2010 17:56:22 +0000 (19:56 +0200)]
t/regressions/01-is_subtype_of.t

index 1ce6e25..87e5382 100644 (file)
@@ -6,7 +6,7 @@ use MooseX::Types;
 use MooseX::Types::Moose qw(Any Item );
 
 
-my $item = subtype as 'Item';
+my $item = subtype as Item;
 
 ok Item->equals('Item');
 ok Item->equals(Item);