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

class_of in Moose::Exporter
---

diff --git a/lib/Moose/Exporter.pm b/lib/Moose/Exporter.pm
index 3ca96b8..b998614 100644
--- a/lib/Moose/Exporter.pm
+++ b/lib/Moose/Exporter.pm
@@ -298,7 +298,7 @@ sub _apply_meta_traits {
 
     return unless @{$traits};
 
-    my $meta = $class->meta();
+    my $meta = Class::MOP::class_of($class);
 
     my $type = ( split /::/, ref $meta )[-1]
         or Moose->throw_error(