Commit | Line | Data |
4c98ebb0 |
1 | use strict; |
2 | use warnings; |
3 | |
9864f0e4 |
4 | use Test::More tests => 1; |
4c98ebb0 |
5 | use Test::Exception; |
6 | |
7 | use Mouse::Meta::Class; |
8 | |
9 | $SIG{__WARN__} = sub { die if shift =~ /recurs/ }; |
10 | |
11 | TODO: |
12 | { |
9864f0e4 |
13 | # local $TODO |
14 | # = 'Loading Mouse::Meta::Class without loading Mouse.pm causes weird problems'; |
4c98ebb0 |
15 | |
16 | my $meta; |
17 | lives_ok { |
18 | $meta = Mouse::Meta::Class->create_anon_class( |
19 | superclasses => [ 'Mouse::Object', ], |
20 | ); |
21 | } |
22 | 'Class is created successfully'; |
23 | } |