4 use Test::More tests => 2;
10 use base 'Class::MOP::Class';
13 my ( $package, %options ) = @_;
14 ::cmp_ok( $options{foo}, 'eq', 'this',
15 'option passed to initialize() on create_anon_class()' );
16 return $class->SUPER::initialize( @_ );
21 my $anon = MyMeta->create_anon_class( foo => 'this' );
22 isa_ok( $anon, 'MyMeta' );