X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fwith.pm;h=96c2a66dcef84fcee410621460de77c64a8a8bc5;hb=fb726d7005e97c2aa568b865ba7b85565e3c8a51;hp=28055b43b19542fe9cc37a74fd403b590cccd856;hpb=ad013db3143aa44c9e891822af066462560d6329;p=dbsrgits%2FSQL-Abstract.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); }