From: Yuval Kogman Date: Wed, 13 Aug 2008 22:20:27 +0000 (+0000) Subject: oops, put Object::_new back in for Moose X-Git-Tag: 0_64_01~15 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4e99d48b6da114b7d0999f529e930101716d2886;p=gitmo%2FClass-MOP.git oops, put Object::_new back in for Moose --- diff --git a/lib/Class/MOP/Object.pm b/lib/Class/MOP/Object.pm index 1b7d2c5..9d4fd8d 100644 --- a/lib/Class/MOP/Object.pm +++ b/lib/Class/MOP/Object.pm @@ -16,6 +16,10 @@ sub meta { Class::MOP::Class->initialize(blessed($_[0]) || $_[0]); } +sub _new { + shift->meta->new_object(@_); +} + # RANT: # Cmon, how many times have you written # the following code while debugging: