MooseX::AttributeHelpers::Trait::Collection::List
Shawn M Moore [Sun, 25 May 2008 01:21:57 +0000 (01:21 +0000)]
lib/MooseX/AttributeHelpers.pm
lib/MooseX/AttributeHelpers/Trait/Collection/List.pm

index 96f48df..f41ea90 100644 (file)
@@ -9,6 +9,7 @@ use MooseX::AttributeHelpers::Meta::Method::Provided;
 use MooseX::AttributeHelpers::Trait::Counter;
 use MooseX::AttributeHelpers::Trait::Number;
 use MooseX::AttributeHelpers::Trait::String;
+use MooseX::AttributeHelpers::Trait::Collection::List;
 
 use MooseX::AttributeHelpers::Counter;
 use MooseX::AttributeHelpers::Number;
index 072fb25..a62bf5d 100644 (file)
@@ -9,18 +9,23 @@ use MooseX::AttributeHelpers::MethodProvider::List;
 
 with 'MooseX::AttributeHelpers::Trait::Collection';
 
-has '+method_provider' => (
-    default => 'MooseX::AttributeHelpers::MethodProvider::List'
+has 'method_provider' => (
+    is        => 'ro',
+    isa       => 'ClassName',
+    predicate => 'has_method_provider',
+    default   => 'MooseX::AttributeHelpers::MethodProvider::List'
 );
 
 sub helper_type { 'ArrayRef' }
 
-no Moose;
+no Moose::Role;
 
 # register the alias ...
 package # hide me from search.cpan.org
-    Moose::Meta::Attribute::Custom::Collection::List;
-sub register_implementation { 'MooseX::AttributeHelpers::Collection::List' }
+    Moose::Meta::Attribute::Custom::Trait::Collection::List;
+sub register_implementation {
+    'MooseX::AttributeHelpers::Trait::Collection::List'
+}
 
 
 1;