X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FComponentUI%2FTestModel%2FFoo.pm;h=70c2b99accf1a3db225181c282baf565441f7b35;hb=56774ab164a79b0acf17f2c96796851d7dcd056d;hp=73de6b631c57cd41010ba7acec6ec6701e87b5fa;hpb=7adfd53f17f66ffe93763e944ed1d3fc52a369dc;p=catagits%2FReaction.git diff --git a/lib/ComponentUI/TestModel/Foo.pm b/lib/ComponentUI/TestModel/Foo.pm index 73de6b6..70c2b99 100644 --- a/lib/ComponentUI/TestModel/Foo.pm +++ b/lib/ComponentUI/TestModel/Foo.pm @@ -1,22 +1,10 @@ package ComponentUI::TestModel::Foo; -use lib 't/lib'; -use Reaction::InterfaceModel::DBIC::ObjectClass; +#use base 'Reaction::InterfaceModel::Object'; +use Reaction::Class; -class Foo, which{ - domain_model '_foo_store' => - (isa => 'RTest::TestDB::Foo', inflate_result => 1, - handles => ['display_name'], - reflect => [qw(id first_name last_name baz_list)], - ); - - reflect_actions - ( - Create => { attrs =>[qw(first_name last_name baz_list)] }, - Update => { attrs =>[qw(first_name last_name baz_list)] }, - Delete => {}, - CustomAction => { attrs =>[qw(last_name baz_list)] }, - ); -}; +#1; +use aliased 'Reaction::InterfaceModel::Object'; +class Foo is Object, which{ }; 1;