X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FClass%2FMOP%2FObject.pm;h=f0170d2fcf81abdfb9153259a78e6b4d8cf8c4ad;hb=88b8ac17305b1bf7f1795337d7d443aec0bd3057;hp=defd47d60905116c56ac881cdc877b74e790e4ef;hpb=6c2f6b5c3b6f9cf9ab4399f3a5f85b90f12cca4f;p=gitmo%2FClass-MOP.git diff --git a/lib/Class/MOP/Object.pm b/lib/Class/MOP/Object.pm index defd47d..f0170d2 100644 --- a/lib/Class/MOP/Object.pm +++ b/lib/Class/MOP/Object.pm @@ -6,7 +6,8 @@ use warnings; use Scalar::Util 'blessed'; -our $VERSION = '0.65'; +our $VERSION = '0.70_01'; +$VERSION = eval $VERSION; our $AUTHORITY = 'cpan:STEVAN'; # introspection @@ -17,8 +18,7 @@ sub meta { } sub _new { - my ( $class, @args ) = @_; - Class::MOP::Class->initialize($class)->new_object(@args); + shift->meta->new_object(@_); } # RANT: