From: Shawn M Moore <sartak@gmail.com>
Date: Sat, 28 Mar 2009 20:54:33 +0000 (-0400)
Subject: class_of in TypeCoercion->new
X-Git-Tag: 0.73_01~36^2~20
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d4db37e2469d1ce988a7098d87ea73fa739b4e29;p=gitmo%2FMoose.git

class_of in TypeCoercion->new
---

diff --git a/lib/Moose/Meta/TypeCoercion.pm b/lib/Moose/Meta/TypeCoercion.pm
index 9e5222f..7f7d10c 100644
--- a/lib/Moose/Meta/TypeCoercion.pm
+++ b/lib/Moose/Meta/TypeCoercion.pm
@@ -31,7 +31,7 @@ __PACKAGE__->meta->add_attribute('compiled_type_coercion' => (
 
 sub new { 
     my $class = shift;
-    my $self  = $class->meta->new_object(@_);
+    my $self  = Class::MOP::class_of($class)->new_object(@_);
     $self->compile_type_coercion;
     return $self;
 }