X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fwith.pm;h=96c2a66dcef84fcee410621460de77c64a8a8bc5;hb=3bb76681f29d474c9ecf55a883a75d3f1e2856e5;hp=28055b43b19542fe9cc37a74fd403b590cccd856;hpb=b73fb1b622b1a1d15916d32e2a4bf102987490e1;p=scpubgit%2FQ-Branch.git diff --git a/lib/with.pm b/lib/with.pm index 28055b4..96c2a66 100644 --- a/lib/with.pm +++ b/lib/with.pm @@ -18,8 +18,9 @@ sub components { Class::C3::Componentised->ensure_class_loaded($_) for @comp_classes; Class::C3::Componentised->inject_base( $new_class, - @comp_classes, $class, + @comp_classes, $class ); + mro::set_mro($new_class, 'c3'); return $new_class unless ref($inv); return bless($inv, $new_class); }