From 90bcd4d7fddc86d573c0cfc5d84e126ed1df2a83 Mon Sep 17 00:00:00 2001 From: groditi Date: Thu, 22 Oct 2009 18:24:11 +0000 Subject: first part of fix for attributes and roles mess. metclass coompat bug still lurks --- lib/ComponentUI/Controller/TestModel/Foo.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'lib/ComponentUI/Controller/TestModel/Foo.pm') diff --git a/lib/ComponentUI/Controller/TestModel/Foo.pm b/lib/ComponentUI/Controller/TestModel/Foo.pm index 8730432..d9f3659 100644 --- a/lib/ComponentUI/Controller/TestModel/Foo.pm +++ b/lib/ComponentUI/Controller/TestModel/Foo.pm @@ -1,7 +1,7 @@ package ComponentUI::Controller::TestModel::Foo; -use base 'Reaction::UI::Controller::Collection::CRUD'; use Reaction::Class; +BEGIN { extends 'Reaction::UI::Controller::Collection::CRUD'; } use aliased 'Reaction::UI::ViewPort::SearchableListViewContainer'; use aliased 'ComponentUI::TestModel::Foo::SearchSpec'; @@ -67,9 +67,9 @@ override _build_action_viewport_args => sub { }; sub object : Chained('base') PathPart('id') CaptureArgs(1) { - my ($self, $c, $object) = @_; - $self->next::method($c, $object); - # just as failing use case + my ($self, $c, $object) = @_; + $self->next::method($c, $object); + # just as failing use case } 1; -- cgit v1.2.3-54-g00ecf