X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=t%2F040_type_constraints%2Ffailing%2F031_subtype_auto_vivify_parent.t;fp=t%2F040_type_constraints%2F031_subtype_auto_vivify_parent.t;h=e245ab89d670b1688274c6dfb02468c8d9c0a6d2;hp=e127ac1d6872fa8e1ef03f907a9cd383c10fd770;hb=9864f0e4ba233c5f30ad6dc7c484ced43d883d27;hpb=8845df4dd6432e3164d078ade741409061adae9f

diff --git a/t/040_type_constraints/031_subtype_auto_vivify_parent.t b/t/040_type_constraints/failing/031_subtype_auto_vivify_parent.t
similarity index 69%
rename from t/040_type_constraints/031_subtype_auto_vivify_parent.t
rename to t/040_type_constraints/failing/031_subtype_auto_vivify_parent.t
index e127ac1..e245ab8 100644
--- a/t/040_type_constraints/031_subtype_auto_vivify_parent.t
+++ b/t/040_type_constraints/failing/031_subtype_auto_vivify_parent.t
@@ -1,12 +1,9 @@
 #!/usr/bin/perl
-# This is automatically generated by author/import-moose-test.pl.
-# DO NOT EDIT THIS FILE. ANY CHANGES WILL BE LOST!!!
-use t::lib::MooseCompat;
 
 use strict;
 use warnings;
 
-use Test::More;
+use Test::More tests => 4;
 
 use Mouse::Util::TypeConstraints;
 
@@ -30,7 +27,5 @@ my $type = find_type_constraint('FooWithSize');
 ok( $type,         'made a FooWithSize constraint' );
 ok( $type->parent, 'type has a parent type' );
 is( $type->parent->name, 'Foo', 'parent type is Foo' );
-isa_ok( $type->parent, 'Mouse::Meta::TypeConstraint',
+isa_ok( $type->parent, 'Mouse::Meta::TypeConstraint::Class',
         'parent type constraint is a class type' );
-
-done_testing;