* formatting change
Jos Boumans [Wed, 24 Jun 2009 12:08:05 +0000 (14:08 +0200)]
lib/MooseX/Storage.pm

index e74a606..a6e4c25 100644 (file)
@@ -59,10 +59,10 @@ sub _injected_storage_role_generator {
     for my $trait ( @{ $params{'traits'} ||= [] } ) {
         push @roles, 'MooseX::Storage::Traits::'.$trait;
     }
-        
-    Class::MOP::load_class($_) 
-        || die "Could not load role (" . $_ . ")"
-            foreach @roles;        
+
+    for my $role ( @roles ) {        
+        Class::MOP::load_class($role) or die "Could not load role ($role)";
+    }
         
     return @roles;
 }