first cut of Reaction::UI::Skin and SiteLayout VP+widget
[catagits/Reaction.git] / lib / ComponentUI / Controller / Root.pm
1 package ComponentUI::Controller::Root;
2
3 use strict;
4 use warnings;
5 use base 'Reaction::UI::Controller::Root';
6 use Reaction::Class;
7
8 use aliased 'Reaction::UI::ViewPort';
9 use aliased 'Reaction::UI::ViewPort::SiteLayout';
10
11 #
12 # Sets the actions in this controller to be registered with no prefix
13 # so they function identically to actions created in MyApp.pm
14 #
15 __PACKAGE__->config(
16   view_name => 'Site',
17   window_title => 'Reaction Test App',
18   namespace => ''
19 );
20
21 sub base :Chained('/') :PathPart('') :CaptureArgs(0) {
22   my ($self, $c) = @_;
23   $self->push_viewport(SiteLayout,
24     title => 'ComponentUI test title',
25     static_base_uri => "${\$c->uri_for('static')}",
26   );
27 }
28
29 sub root :Chained('base') :PathPart('') :Args(0) {
30   my ($self, $c) = @_;
31   $self->push_viewport(ViewPort, layout => 'index');
32 }
33
34 sub static :Chained('base') :PathPart('static') :Args {
35   my ($self, $c, @args) = @_;
36   return if $c->stash->{window}->view->serve_static_file($c, \@args);
37   $c->forward('error_404');
38 }
39
40 sub error_404 :Private {
41   my ($self, $c) = @_;
42   $c->res->body("Error 404");
43   $c->res->status(404);
44 }
45
46 1;