X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F040_type_constraints%2Ffailing%2F002_util_type_constraints_export.t;fp=t%2F040_type_constraints%2Ffailing%2F002_util_type_constraints_export.t;h=0000000000000000000000000000000000000000;hb=fde8e43f95fe996fbc2a778aa259feeb04552171;hp=5d5612cb7b0d4e4e28c13c56d4052931476efb72;hpb=0bdc9d38dfd3de07aad929f6629f8fa65d434c27;p=gitmo%2FMouse.git

diff --git a/t/040_type_constraints/failing/002_util_type_constraints_export.t b/t/040_type_constraints/failing/002_util_type_constraints_export.t
deleted file mode 100644
index 5d5612c..0000000
--- a/t/040_type_constraints/failing/002_util_type_constraints_export.t
+++ /dev/null
@@ -1,28 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-
-use Test::More tests => 4;
-use Test::Exception;
-
-{
-    package Foo;
-
-    use Mouse::Util::TypeConstraints;
-
-    eval {
-        type MyRef => where { ref($_) };
-    };
-    ::ok( !$@, '... successfully exported &type to Foo package' );
-
-    eval {
-        subtype MyArrayRef => as MyRef => where { ref($_) eq 'ARRAY' };
-    };
-    ::ok( !$@, '... successfully exported &subtype to Foo package' );
-
-    Mouse::Util::TypeConstraints->export_type_constraints_as_functions();
-
-    ::ok( MyRef( {} ), '... Ref worked correctly' );
-    ::ok( MyArrayRef( [] ), '... ArrayRef worked correctly' );
-}