[Catalyst] Reaction opened up for people to play with (patcheswelcome :)

[Fernan Aguero]

+----[ Jon Warbrick <jw35 at cam.ac.uk> (17.Oct.2006 06:57):
|
| On Mon, 16 Oct 2006, Matt S Trout wrote:
| 
| > ...
| > Anybody who's interested in what we've been doing, give it a prod. 
| 
| Installation observations, in case they help others:
| 
| 1) Requires SQL-Translator-0.08 which only exists on CPAN as a developer 
| module and so won't (can't? - I've never understood) be installed by the 
| cpan shell or (I think) 'make deptinstall'. Can be downloaded and 
| installed by hand.
| 
| 2) For me at least, the curent Email-MIME (1.854) fails one of it's tests. 
| 1.853 installs OK and is sufficient for Reaction. I've told the module's 
| maintainer.
| 
| 3) DateTime::Format::MySQL appears to be needed for Date parsing but 
| doesn't appear as an explicit dependency.

and I add the following (these were all missing/required
when trying to start the builtin server):

o Catalyst-Plugin-I18N
o DateTime
o aliased
o Moose

I'm sure missing others that were already present on my box.

| Now to actually play with it...
|
+----]

Is this supposed to be a web app code example that is not
yet ready to run? Cause I get this when starting the
builtin web server:

Script started on Mon Oct 16 22:08:43 2006
[fernan at omega] ./script/componentui_server.pl 

package ComponentUI::Model::Action::DeleteFoo;
use Reaction::Class;
extends 'Reaction::InterfaceModel::Action::DBIC::Result::Delete';
package ComponentUI::Model::Action::UpdateFoo;
use Reaction::Class;
extends 'Reaction::InterfaceModel::Action::DBIC::Result::Update';
has 'baz_list' => (isa => 'ArrayRef', is => 'rw', set_or_lazy_fail('baz_list'), default => sub { [] }, valid_values => sub {
  $_[0]->target_model
       ->result_source
       ->related_source('links_to_baz_list')
       ->related_source('baz')
       ->resultset;
  });
has 'last_name' => (isa => 'NonEmptySimpleStr', is => 'rw', set_or_lazy_fail('last_name'));
has 'first_name' => (isa => 'NonEmptySimpleStr', is => 'rw', set_or_lazy_fail('first_name'));
package ComponentUI::Model::Action::CreateFoo;
use Reaction::Class;
extends 'Reaction::InterfaceModel::Action::DBIC::ResultSet::Create';
has 'baz_list' => (isa => 'ArrayRef', is => 'rw', set_or_lazy_fail('baz_list'), default => sub { [] }, valid_values => sub {
  $_[0]->target_model
       ->result_source
       ->related_source('links_to_baz_list')
       ->related_source('baz')
       ->resultset;
  });
has 'last_name' => (isa => 'NonEmptySimpleStr', is => 'rw', set_or_lazy_fail('last_name'));
has 'first_name' => (isa => 'NonEmptySimpleStr', is => 'rw', set_or_lazy_fail('first_name'));
package ComponentUI::Model::Action::DeleteBar;
use Reaction::Class;
extends 'Reaction::InterfaceModel::Action::DBIC::Result::Delete';
package ComponentUI::Model::Action::UpdateBar;
use Reaction::Class;
extends 'Reaction::InterfaceModel::Action::DBIC::Result::Update';
has 'published_at' => (isa => 'DateTime', is => 'rw');
has 'avatar' => (isa => 'File', is => 'rw');
has 'name' => (isa => 'NonEmptySimpleStr', is => 'rw', set_or_lazy_fail('name'));
has 'foo' => (isa => 'RTest::TestDB::Foo', is => 'rw', set_or_lazy_fail('foo'), valid_values => sub {
  $_[0]->target_model
       ->result_source
       ->related_source('foo')
       ->resultset;
  });
package ComponentUI::Model::Action::CreateBar;
use Reaction::Class;
extends 'Reaction::InterfaceModel::Action::DBIC::ResultSet::Create';
has 'published_at' => (isa => 'DateTime', is => 'rw');
has 'avatar' => (isa => 'File', is => 'rw');
has 'name' => (isa => 'NonEmptySimpleStr', is => 'rw', set_or_lazy_fail('name'));
has 'foo' => (isa => 'RTest::TestDB::Foo', is => 'rw', set_or_lazy_fail('foo'), valid_values => sub {
  $_[0]->target_model
       ->result_source
       ->related_source('foo')
       ->resultset;
  });
package ComponentUI::Model::Action::DeleteBaz;
use Reaction::Class;
extends 'Reaction::InterfaceModel::Action::DBIC::Result::Delete';
package ComponentUI::Model::Action::UpdateBaz;
use Reaction::Class;
extends 'Reaction::InterfaceModel::Action::DBIC::Result::Update';
has 'name' => (isa => 'NonEmptySimpleStr', is => 'rw', set_or_lazy_fail('name'));
package ComponentUI::Model::Action::CreateBaz;
use Reaction::Class;
extends 'Reaction::InterfaceModel::Action::DBIC::ResultSet::Create';
has 'name' => (isa => 'NonEmptySimpleStr', is => 'rw', set_or_lazy_fail('name'));
Base class package "Catalyst::Controller::BindLex" is empty.
    (Perhaps you need to 'use' the module which defines that package first.)
 at /home/fernan/web/examples/reaction/svn/script/../lib/Reaction/UI/Controller.pm line 3
BEGIN failed--compilation aborted at /home/fernan/web/examples/reaction/svn/script/../lib/Reaction/UI/Controller.pm line 3.
Compilation failed in require at (eval 209) line 3.
	...propagated at /usr/local/lib/perl5/5.8.8/base.pm line 85.
BEGIN failed--compilation aborted at /home/fernan/web/examples/reaction/svn/script/../lib/Reaction/UI/CRUDController.pm line 5.
Compilation failed in require at (eval 208) line 3.
	...propagated at /usr/local/lib/perl5/5.8.8/base.pm line 85.
BEGIN failed--compilation aborted at /home/fernan/web/examples/reaction/svn/script/../lib/ComponentUI/Controller/Bar.pm line 5.
Compilation failed in require at (eval 207) line 3.
Compilation failed in require at ./script/componentui_server.pl line 52.
[fernan at omega] ^Dexit

Script done on Mon Oct 16 22:09:00 2006o

Fernan