use strict;
use warnings;
use Test::More tests => 1;
use Test::Exception;
{
package ParentClass;
use Mouse;
}
{
package SomeClass;
use base 'ParentClass';
}
{
package SubClassUseBase;
use base qw/SomeClass/;
use Mouse;
}
lives_ok {
Mouse->init_meta(for_class => 'SomeClass');
} 'Mouse class => use base => Mouse Class, then Mouse->init_meta on middle class ok';