Require Dist::Zilla 4.200016+

[gitmo/Moose.git] / t / cmop / deprecated.t

diff --git a/t/cmop/deprecated.t b/t/cmop/deprecated.t
index 471fb4a..07a8cf9 100644 (file)
--- a/t/cmop/deprecated.t
+++ b/t/cmop/deprecated.t
@@ -8,66 +8,6 @@ use Carp;
 
 $SIG{__WARN__} = \&croak;
 
-{
-    package Foo;
-
-    ::like( ::exception {
-        Class::MOP::in_global_destruction();
-        }, qr/\b deprecated \b/xmsi, 'Class::MOP::in_global_destruction is deprecated' );
-}
-
-{
-    package Bar;
-
-    use Class::MOP::Deprecated -api_version => 0.93;
-
-    ::like( ::exception {
-        Class::MOP::in_global_destruction();
-        }, qr/\b deprecated \b/xmsi, 'Class::MOP::in_global_destruction is deprecated with 0.93 compatibility' );
-}
-
-{
-    package Baz;
-
-    use Class::MOP::Deprecated -api_version => 0.92;
-
-    ::is( ::exception {
-        Class::MOP::in_global_destruction();
-        }, undef, 'Class::MOP::in_global_destruction is not deprecated with 0.92 compatibility' );
-}
-
-{
-    package Foo2;
-
-    use metaclass;
-
-    ::like( ::exception { Foo2->meta->get_attribute_map }, qr/\Qget_attribute_map method has been deprecated/, 'get_attribute_map is deprecated' );
-}
-
-{
-    package Quux;
-
-    use Class::MOP::Deprecated -api_version => 0.92;
-    use Scalar::Util qw( blessed );
-
-    use metaclass;
-
-    sub foo {42}
-
-    Quux->meta->add_method( bar => sub {84} );
-
-    my $map = Quux->meta->get_method_map;
-    my @method_objects = grep { blessed($_) } values %{$map};
-
-    ::is(
-        scalar @method_objects, 3,
-        'get_method_map still returns all values as method object'
-    );
-    ::is_deeply(
-        [ sort keys %{$map} ],
-        [qw( bar foo meta )],
-        'get_method_map returns expected methods'
-    );
-}
+pass("nothing for now...");
 
 done_testing;