aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorwreis <wreis@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7>2008-07-04 17:43:09 +0000
committerwreis <wreis@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7>2008-07-04 17:43:09 +0000
commit905a0946cb98604ca2eda11557d7a8772acb6212 (patch)
treea8252f7c2d0857da9193611844851a796d850af7
parent510f6c258c4f33c20a555db88cdb148e0f451e55 (diff)
downloadreaction-905a0946cb98604ca2eda11557d7a8772acb6212.tar.gz
reaction-905a0946cb98604ca2eda11557d7a8772acb6212.zip
valid_values as inheritable option
-rw-r--r--Makefile.PL2
-rw-r--r--lib/Reaction/Meta/Attribute.pm4
-rw-r--r--lib/Reaction/Meta/InterfaceModel/Action/ParameterAttribute.pm2
3 files changed, 6 insertions, 2 deletions
diff --git a/Makefile.PL b/Makefile.PL
index 32017ca..7e299b3 100644
--- 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
--- 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
--- 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'
);