X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FTest%2FMoose.pm;h=216931f09422f9da1bbfb962c43c22341a6c5ab4;hb=efa728b4984ddf1611bc9931fbc209438459652c;hp=7c5ac99c8e3ebe59b22d15d2b1c738177c8ebe0c;hpb=ae7820b1b884344a7ee90d94b484ca46459eb7b1;p=gitmo%2FMoose.git diff --git a/lib/Test/Moose.pm b/lib/Test/Moose.pm index 7c5ac99..216931f 100644 --- a/lib/Test/Moose.pm +++ b/lib/Test/Moose.pm @@ -9,7 +9,7 @@ use Test::Builder; use List::MoreUtils 'all'; use Moose::Util 'does_role', 'find_meta'; -our $VERSION = '1.06'; +our $VERSION = '1.15'; $VERSION = eval $VERSION; our $AUTHORITY = 'cpan:STEVAN'; @@ -76,7 +76,7 @@ sub with_immutable (&@) { my $block = shift; my $before = $Test->current_test; $block->(); - $_->meta->make_immutable for @_; + Class::MOP::class_of($_)->make_immutable for @_; $block->(); my $num_tests = $Test->current_test - $before; return all { $_ } ($Test->summary)[-$num_tests..-1];