X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FUndefTolerant%2FApplicationToClass.pm;h=b6be5df48fb9d946109940e92143ff57545bc5a5;hb=6095de21fa00670b76aa68f6cd89465cb49572d3;hp=353858bc7883a16ad44eb0789a077335864db854;hpb=fff0a09d7aa2aaccf7ab93d2f5cb005ada59a1d9;p=gitmo%2FMooseX-UndefTolerant.git diff --git a/lib/MooseX/UndefTolerant/ApplicationToClass.pm b/lib/MooseX/UndefTolerant/ApplicationToClass.pm index 353858b..b6be5df 100644 --- a/lib/MooseX/UndefTolerant/ApplicationToClass.pm +++ b/lib/MooseX/UndefTolerant/ApplicationToClass.pm @@ -6,7 +6,7 @@ around apply => sub { my $self = shift; my ($role, $class) = @_; - Moose::Util::MetaRole::apply_metaroles( + $class = Moose::Util::MetaRole::apply_metaroles( for => $class, class_metaroles => { class => [ 'MooseX::UndefTolerant::Class' ],