From: Shawn M Moore <sartak@gmail.com>
Date: Sat, 28 Mar 2009 19:51:17 +0000 (-0400)
Subject: Another error change
X-Git-Tag: 0.80~20
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=051a2fc9a189a85fa1db777bd44257abb37317d3;p=gitmo%2FClass-MOP.git

Another error change
---

diff --git a/lib/Class/MOP/Class.pm b/lib/Class/MOP/Class.pm
index 5c65f73..0801cb7 100644
--- a/lib/Class/MOP/Class.pm
+++ b/lib/Class/MOP/Class.pm
@@ -177,9 +177,9 @@ sub check_metaclass_compatibility {
         # we also need to check that instance metaclasses
         # are compatibile in the same the class.
         ($self->instance_metaclass->isa($super_meta->instance_metaclass))
-            || confess $self->name . "->meta->instance_metaclass => (" . ($self->instance_metaclass) . ")" .
+            || confess "Class::MOP::class_of(" . $self->name . ")->instance_metaclass => (" . ($self->instance_metaclass) . ")" .
                        " is not compatible with the " .
-                       $superclass_name . "->meta->instance_metaclass => (" . ($super_meta->instance_metaclass) . ")";
+                       "Class::MOP::class_of(" . $superclass_name . ")->instance_metaclass => (" . ($super_meta->instance_metaclass) . ")";
     }
 }