use List::MoreUtils 'all';
use Moose::Util 'does_role', 'find_meta';
-our $VERSION = '1.04';
+our $VERSION = '1.9900';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
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];
=head1 COPYRIGHT AND LICENSE
-Copyright 2007-2009 by Infinity Interactive, Inc.
+Copyright 2007-2010 by Infinity Interactive, Inc.
L<http://www.iinteractive.com>