X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F070_immutable_metaclass.t;h=5b1a1ca69ad1eb34fb5f1ce4c1615849f3ac3039;hb=4d0489082d1147dc5f77a3a22b0c7a7a4703b084;hp=d057136af70542acb946968f0791b890d620cbcc;hpb=81c8a65bf02bb1b0e240d8f5b626b0ceabf9a37c;p=gitmo%2FClass-MOP.git diff --git a/t/070_immutable_metaclass.t b/t/070_immutable_metaclass.t index d057136..5b1a1ca 100644 --- a/t/070_immutable_metaclass.t +++ b/t/070_immutable_metaclass.t @@ -3,12 +3,11 @@ use strict; use warnings; -use Test::More tests => 77; +use Test::More tests => 73; use Test::Exception; BEGIN { use_ok('Class::MOP'); - use_ok('Class::MOP::Class::Immutable'); } { @@ -57,7 +56,6 @@ BEGIN { ok(!$meta->is_mutable, '... our class is no longer mutable'); ok($meta->is_immutable, '... our class is now immutable'); - isa_ok($meta, 'Class::MOP::Class::Immutable'); isa_ok($meta, 'Class::MOP::Class'); dies_ok { $meta->add_method() } '... exception thrown as expected'; @@ -119,7 +117,6 @@ BEGIN { ok(!$meta->is_mutable, '... our class is no longer mutable'); ok($meta->is_immutable, '... our class is now immutable'); - isa_ok($meta, 'Class::MOP::Class::Immutable'); isa_ok($meta, 'Class::MOP::Class'); dies_ok { $meta->add_method() } '... exception thrown as expected'; @@ -181,7 +178,6 @@ BEGIN { ok(!$meta->is_mutable, '... our class is no longer mutable'); ok($meta->is_immutable, '... our class is now immutable'); - isa_ok($meta, 'Class::MOP::Class::Immutable'); isa_ok($meta, 'Class::MOP::Class'); dies_ok { $meta->add_method() } '... exception thrown as expected';