Checking in changes prior to tagging of version 0.40. Changelog diff is:

[gitmo/Mouse.git] / lib / Mouse / Meta / Attribute.pm

diff --git a/lib/Mouse/Meta/Attribute.pm b/lib/Mouse/Meta/Attribute.pm
index 71a2bbd..dff0b1e 100644 (file)
--- a/lib/Mouse/Meta/Attribute.pm
+++ b/lib/Mouse/Meta/Attribute.pm
@@ -214,21 +214,17 @@ sub interpolate_class{
     my @traits;
     if(my $traits_ref = delete $args->{traits}){
 
-        local $@;
-        eval{
-            for (my $i = 0; $i < @{$traits_ref}; $i++) {
-                my $trait = Mouse::Util::resolve_metaclass_alias(Attribute => $traits_ref->[$i], trait => 1);
+        for (my $i = 0; $i < @{$traits_ref}; $i++) {
+            my $trait = Mouse::Util::resolve_metaclass_alias(Attribute => $traits_ref->[$i], trait => 1);
 
-                next if $class->does($trait);
+            next if $class->does($trait);
 
-                push @traits, $trait;
+            push @traits, $trait;
 
-                # are there options?
-                push @traits, $traits_ref->[++$i]
-                    if ref($traits_ref->[$i+1]);
-            }
-        };
-        warn "Fatal error in traits: $@" if _MOUSE_VERBOSE;
+            # are there options?
+            push @traits, $traits_ref->[++$i]
+                if ref($traits_ref->[$i+1]);
+        }
 
         if (@traits) {
             $class = Mouse::Meta::Class->create_anon_class(
@@ -468,7 +464,7 @@ Mouse::Meta::Attribute - The Mouse attribute metaclass
 
 =head1 VERSION
 
-This document describes Mouse version 0.39
+This document describes Mouse version 0.40
 
 =head1 METHODS