valid_values as inheritable option

diff --git a/Makefile.PL b/Makefile.PL
index 32017ca..7e299b3 100644 (file)
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -15,7 +15,7 @@ requires 'Test::Class' => 0;
 requires 'Test::Memory::Cycle' => 0;
 requires 'DBIx::Class' => '0.07001';
 requires 'SQL::Translator' => '0.08';
-requires 'Moose' => '0.43';
+requires 'Moose' => '0.54';
 requires 'aliased' => 0;
 requires 'DateTime';
 requires 'DateTime::Span';

diff --git a/lib/Reaction/Meta/Attribute.pm b/lib/Reaction/Meta/Attribute.pm
index a925982..b6ea1a0 100644 (file)
--- a/lib/Reaction/Meta/Attribute.pm
+++ b/lib/Reaction/Meta/Attribute.pm
@@ -8,6 +8,10 @@ extends 'Moose::Meta::Attribute';
 has lazy_fail  =>
     (is => 'ro', reader => 'is_lazy_fail',  required => 1, default => 0);
 
+around legal_options_for_inheritance => sub {
+  return (shift->(@_), qw/valid_values/);
+};
+
 around _process_options => sub {
     my $super = shift;
     my ($class, $name, $options) = @_;

diff --git a/lib/Reaction/Meta/InterfaceModel/Action/ParameterAttribute.pm b/lib/Reaction/Meta/InterfaceModel/Action/ParameterAttribute.pm
index b838444..6c2a651 100644 (file)
--- a/lib/Reaction/Meta/InterfaceModel/Action/ParameterAttribute.pm
+++ b/lib/Reaction/Meta/InterfaceModel/Action/ParameterAttribute.pm
@@ -6,7 +6,7 @@ use Scalar::Util 'blessed';
 class ParameterAttribute is 'Reaction::Meta::Attribute', which {
   has valid_values => (
     isa => 'CodeRef',
-    is => 'rw', # hack since clone_and_inherit hates me.
+    is => 'rw', # doesnt need of it anymore, maybe we should warn before change it
     predicate => 'has_valid_values'
   );