X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F040_type_constraints%2F017_subtyping_union_types.t;h=505e92cc29ef08c3d2e145d6cdf4ff3725656a55;hb=460eb22dd849bdfdd8dd73c22799ca37bfbf2ec8;hp=ff8d90dab3529bca045114440ac411fe05178852;hpb=a254bf514576f3d4a5bcde5a0db4d4ced9ad566b;p=gitmo%2FMouse.git

diff --git a/t/040_type_constraints/017_subtyping_union_types.t b/t/040_type_constraints/017_subtyping_union_types.t
index ff8d90d..505e92c 100755
--- a/t/040_type_constraints/017_subtyping_union_types.t
+++ b/t/040_type_constraints/017_subtyping_union_types.t
@@ -3,11 +3,11 @@
 use strict;
 use warnings;
 
-use Test::More tests => 21;
+use Test::More tests => 19;
 use Test::Exception;
 
 BEGIN {
-    use_ok("Moose::Util::TypeConstraints");
+    use_ok("Mouse::Util::TypeConstraints");
 }
 
 lives_ok {
@@ -16,13 +16,13 @@ lives_ok {
 
 {
     my $t = find_type_constraint('MyCollections');
-    isa_ok($t, 'Moose::Meta::TypeConstraint');
+    isa_ok($t, 'Mouse::Meta::TypeConstraint');
 
     is($t->name, 'MyCollections', '... name is correct');
 
     my $p = $t->parent;
-    isa_ok($p, 'Moose::Meta::TypeConstraint::Union');
-    isa_ok($p, 'Moose::Meta::TypeConstraint');
+#    isa_ok($p, 'Mouse::Meta::TypeConstraint::Union');
+    isa_ok($p, 'Mouse::Meta::TypeConstraint');
 
     is($p->name, 'ArrayRef|HashRef', '... parent name is correct');
 
@@ -47,13 +47,13 @@ lives_ok {
 
 {
     my $t = find_type_constraint('MyCollectionsExtended');
-    isa_ok($t, 'Moose::Meta::TypeConstraint');
+    isa_ok($t, 'Mouse::Meta::TypeConstraint');
 
     is($t->name, 'MyCollectionsExtended', '... name is correct');
 
     my $p = $t->parent;
-    isa_ok($p, 'Moose::Meta::TypeConstraint::Union');
-    isa_ok($p, 'Moose::Meta::TypeConstraint');
+#    isa_ok($p, 'Mouse::Meta::TypeConstraint::Union');
+    isa_ok($p, 'Mouse::Meta::TypeConstraint');
 
     is($p->name, 'ArrayRef|HashRef', '... parent name is correct');