Trait::Collection::Bag

[gitmo/MooseX-AttributeHelpers.git] / lib / MooseX / AttributeHelpers / Collection / Bag.pm

diff --git a/lib/MooseX/AttributeHelpers/Collection/Bag.pm b/lib/MooseX/AttributeHelpers/Collection/Bag.pm
index 48bb388..46e0931 100644 (file)
--- a/lib/MooseX/AttributeHelpers/Collection/Bag.pm
+++ b/lib/MooseX/AttributeHelpers/Collection/Bag.pm
@@ -14,7 +14,8 @@ has '+method_provider' => (
     default => 'MooseX::AttributeHelpers::MethodProvider::Bag'
 );
 
-subtype 'Bag' => as 'HashRef[Int]';
+subtype 'Bag' => as 'HashRef[Int]'
+    unless find_type_constraint('Bag');
 
 sub helper_type { 'Bag' }
 
@@ -107,4 +108,4 @@ L<http://www.iinteractive.com>
 This library is free software; you can redistribute it and/or modify
 it under the same terms as Perl itself.
 
-=cut
\ No newline at end of file
+=cut