Lots of code cleanup in M::AH traits.

[gitmo/Moose.git] / lib / Moose / AttributeHelpers / Trait / Collection / Bag.pm

diff --git a/lib/Moose/AttributeHelpers/Trait/Collection/Bag.pm b/lib/Moose/AttributeHelpers/Trait/Collection/Bag.pm
index 84285ac..3f96d08 100644 (file)
--- a/lib/Moose/AttributeHelpers/Trait/Collection/Bag.pm
+++ b/lib/Moose/AttributeHelpers/Trait/Collection/Bag.pm
@@ -22,17 +22,7 @@ subtype 'Bag' => as 'HashRef[Int]';
 
 sub helper_type { 'Bag' }
 
-before 'process_options_for_handles' => sub {
-    my ( $self, $options, $name ) = @_;
-
-    # Set some default attribute options here unless already defined
-    if ( ( my $type = $self->helper_type ) && !exists $options->{isa} ) {
-        $options->{isa} = $type;
-    }
-
-    $options->{default} = sub { +{} }
-        unless exists $options->{default};
-};
+sub _default_default { sub { {} } }
 
 no Moose::Role;
 no Moose::Util::TypeConstraints;