aboutsummaryrefslogtreecommitdiffstats
path: root/lib
diff options
context:
space:
mode:
authormatthewt <matthewt@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7>2009-04-30 17:18:53 +0000
committermatthewt <matthewt@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7>2009-04-30 17:18:53 +0000
commit83529ec10275fa6aef95000ccb1f846b16a7e396 (patch)
treeb16d36df36190175d072da2100206df507c81fd6 /lib
parent49a473c8a270f2d8fedacce3e52aed46e1d076dd (diff)
downloadreaction-83529ec10275fa6aef95000ccb1f846b16a7e396.tar.gz
reaction-83529ec10275fa6aef95000ccb1f846b16a7e396.zip
changes for 0.002000, thank you xinming for reminding me, I'm a fucking idiot
Diffstat (limited to 'lib')
-rw-r--r--lib/Reaction.pm2
-rw-r--r--lib/Reaction/Meta/InterfaceModel/Action/Class.pm4
-rw-r--r--lib/Reaction/Meta/InterfaceModel/Action/ParameterAttribute.pm2
-rw-r--r--lib/Reaction/Meta/InterfaceModel/Object/Class.pm4
-rw-r--r--lib/Reaction/Meta/InterfaceModel/Object/DomainModelAttribute.pm6
-rw-r--r--lib/Reaction/Meta/InterfaceModel/Object/ParameterAttribute.pm3
-rw-r--r--lib/Reaction/UI/Controller.pm1
7 files changed, 6 insertions, 16 deletions
diff --git a/lib/Reaction.pm b/lib/Reaction.pm
index 2d5a83e..d9bf746 100644
--- a/lib/Reaction.pm
+++ b/lib/Reaction.pm
@@ -1,5 +1,5 @@
package Reaction;
-our $VERSION = '0.001001';
+our $VERSION = '0.002000';
1;
diff --git a/lib/Reaction/Meta/InterfaceModel/Action/Class.pm b/lib/Reaction/Meta/InterfaceModel/Action/Class.pm
index b25cfa2..8b23c73 100644
--- a/lib/Reaction/Meta/InterfaceModel/Action/Class.pm
+++ b/lib/Reaction/Meta/InterfaceModel/Action/Class.pm
@@ -6,8 +6,6 @@ use aliased 'Reaction::Meta::InterfaceModel::Action::ParameterAttribute';
use namespace::clean -except => [ qw(meta) ];
extends 'Reaction::Meta::Class';
-sub new { shift->SUPER::new(@_) };
-
around initialize => sub {
my $super = shift;
my $class = shift;
@@ -20,7 +18,7 @@ sub parameter_attributes {
$self->get_all_attributes;
};
-__PACKAGE__->meta->make_immutable;
+__PACKAGE__->meta->make_immutable(inline_constructor => 0);
1;
diff --git a/lib/Reaction/Meta/InterfaceModel/Action/ParameterAttribute.pm b/lib/Reaction/Meta/InterfaceModel/Action/ParameterAttribute.pm
index d093be9..bee0197 100644
--- a/lib/Reaction/Meta/InterfaceModel/Action/ParameterAttribute.pm
+++ b/lib/Reaction/Meta/InterfaceModel/Action/ParameterAttribute.pm
@@ -70,7 +70,7 @@ sub valid_value_collection {
return $valid;
};
-__PACKAGE__->meta->make_immutable;
+__PACKAGE__->meta->make_immutable(inline_constructor => 0);
1;
diff --git a/lib/Reaction/Meta/InterfaceModel/Object/Class.pm b/lib/Reaction/Meta/InterfaceModel/Object/Class.pm
index 47997ff..a755f91 100644
--- a/lib/Reaction/Meta/InterfaceModel/Object/Class.pm
+++ b/lib/Reaction/Meta/InterfaceModel/Object/Class.pm
@@ -8,8 +8,6 @@ use Reaction::Class;
use namespace::clean -except => [ qw(meta) ];
extends 'Reaction::Meta::Class';
-sub new { shift->SUPER::new(@_) };
-
around initialize => sub {
my $super = shift;
my $class = shift;
@@ -32,7 +30,7 @@ sub domain_models {
$self->get_all_attributes;
};
-__PACKAGE__->meta->make_immutable;
+__PACKAGE__->meta->make_immutable(inline_constructor => 0);
1;
diff --git a/lib/Reaction/Meta/InterfaceModel/Object/DomainModelAttribute.pm b/lib/Reaction/Meta/InterfaceModel/Object/DomainModelAttribute.pm
index 1d43266..2db918c 100644
--- a/lib/Reaction/Meta/InterfaceModel/Object/DomainModelAttribute.pm
+++ b/lib/Reaction/Meta/InterfaceModel/Object/DomainModelAttribute.pm
@@ -5,11 +5,7 @@ use Reaction::Class;
use namespace::clean -except => [ qw(meta) ];
extends 'Reaction::Meta::Attribute';
-
-#i feel like something should happen here, but i aint got nothin.
-sub new { shift->SUPER::new(@_); }; # work around immutable
-
-__PACKAGE__->meta->make_immutable;
+__PACKAGE__->meta->make_immutable(inline_constructor => 0);
1;
diff --git a/lib/Reaction/Meta/InterfaceModel/Object/ParameterAttribute.pm b/lib/Reaction/Meta/InterfaceModel/Object/ParameterAttribute.pm
index ebe16e1..602a9c5 100644
--- a/lib/Reaction/Meta/InterfaceModel/Object/ParameterAttribute.pm
+++ b/lib/Reaction/Meta/InterfaceModel/Object/ParameterAttribute.pm
@@ -17,9 +17,8 @@ has orig_attr_name => (
is => 'ro',
predicate => 'has_orig_attr_name'
);
-sub new { shift->SUPER::new(@_); }; # work around immutable
-__PACKAGE__->meta->make_immutable;
+__PACKAGE__->meta->make_immutable(inline_constructor => 0);
1;
diff --git a/lib/Reaction/UI/Controller.pm b/lib/Reaction/UI/Controller.pm
index a9eeb59..d5c2b28 100644
--- a/lib/Reaction/UI/Controller.pm
+++ b/lib/Reaction/UI/Controller.pm
@@ -12,7 +12,6 @@ with 'Catalyst::Component::InstancePerContext';
sub build_per_context_instance {
my ($self, $c, @args) = @_;
my $newself = $self->new($self->_application, {%$self, context => $c, @args});
- weaken $newself->{context}; #stopgap till cat 5.8
return $newself;
}