Regenerate test files
[gitmo/Mouse.git] / t / 040_type_constraints / failing / 033_type_names.t
diff --git a/t/040_type_constraints/failing/033_type_names.t b/t/040_type_constraints/failing/033_type_names.t
deleted file mode 100644 (file)
index cdfee29..0000000
+++ /dev/null
@@ -1,36 +0,0 @@
-use strict;
-use warnings;
-
-use Test::More tests => 6;
-use Test::Exception;
-
-use Mouse::Meta::TypeConstraint;
-use Mouse::Util::TypeConstraints;
-
-
-TODO:
-{
-    local $TODO = 'type names are not validated in the TC metaclass';
-
-    throws_ok { Mouse::Meta::TypeConstraint->new( name => 'Foo-Bar' ) }
-    qr/contains invalid characters/,
-        'Type names cannot contain a dash';
-}
-
-lives_ok { Mouse::Meta::TypeConstraint->new( name => 'Foo.Bar::Baz' ) }
-'Type names can contain periods and colons';
-
-throws_ok { subtype 'Foo-Baz' => as 'Item' }
-qr/contains invalid characters/,
-    'Type names cannot contain a dash (via subtype sugar)';
-
-lives_ok { subtype 'Foo.Bar::Baz' => as 'Item' }
-'Type names can contain periods and colons (via subtype sugar)';
-
-is( Mouse::Util::TypeConstraints::find_or_parse_type_constraint('ArrayRef[In-valid]'),
-    undef,
-    'find_or_parse_type_constraint returns undef on an invalid name' );
-
-is( Mouse::Util::TypeConstraints::find_or_parse_type_constraint('ArrayRef[Va.lid]'),
-    'ArrayRef[Va.lid]',
-    'find_or_parse_type_constraint returns name for valid name' );