Convert all tests to done_testing.
[gitmo/Moose.git] / t / 100_bugs / 026_create_anon_recursion.t
1 use strict;
2 use warnings;
3
4 use Test::More;
5 use Test::Exception;
6
7 use Moose::Meta::Class;
8
9 $SIG{__WARN__} = sub { die if shift =~ /recurs/ };
10
11 TODO:
12 {
13     local $TODO
14         = 'Loading Moose::Meta::Class without loading Moose.pm causes weird problems';
15
16     my $meta;
17     lives_ok {
18         $meta = Moose::Meta::Class->create_anon_class(
19             superclasses => [ 'Moose::Object', ],
20         );
21     }
22     'Class is created successfully';
23 }
24
25 done_testing;