X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FMeta%2FClass.pm;h=4f3166c5d9e746695da46d40101d5bd2980ed278;hb=ca980dc4f492df68e6536c0c83a2d520adc43066;hp=639404b8956b2e38d8193a048c9ef6d5bbf869d7;hpb=a4b15169d428989d2e901708effe21f3eaab23b5;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Meta/Class.pm b/lib/Mouse/Meta/Class.pm index 639404b..4f3166c 100644 --- a/lib/Mouse/Meta/Class.pm +++ b/lib/Mouse/Meta/Class.pm @@ -238,7 +238,7 @@ sub clone_object { || $class->throw_error("You must pass an instance of the metaclass (" . $class->name . "), not ($object)"); my $cloned = bless { %$object }, ref $object; - $class->_initialize_object($cloned, $args); + $class->_initialize_object($cloned, $args, 1); return $cloned; } @@ -486,7 +486,7 @@ Mouse::Meta::Class - The Mouse class metaclass =head1 VERSION -This document describes Mouse version 0.50_08 +This document describes Mouse version 0.55 =head1 METHODS