Fix the class for init_meta()
gfx [Sat, 16 Jan 2010 05:02:42 +0000 (14:02 +0900)]
lib/Mouse/Exporter.pm

index b473eb9..934b1c3 100644 (file)
@@ -171,7 +171,7 @@ sub do_import {
     if($spec->{INIT_META}){
         my $meta;
         foreach my $init_meta(@{$spec->{INIT_META}}){
-            $meta = $into->$init_meta(for_class => $into);
+            $meta = $package->$init_meta(for_class => $into);
         }
 
         if(@traits){