Mercurial > pub > Impl

comparison Lib/IMPL/Web/Application.pm @ 60:b0c068da93ac

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Lazy activation for the configuration objects (final concept) small fixes
author wizard
date Tue, 09 Mar 2010 19:47:39 +0300
parents 0f3e369553bd
children c64bd1bf727d
comparison
equal deleted inserted replaced
59:0f3e369553bd 60:b0c068da93ac
1 package IMPL::Web::Application; 1 package IMPL::Web::Application;
2 use strict; 2 use strict;
3 use warnings; 3 use warnings;
4 4
5 use base qw(IMPL::Object IMPL::Object::Singleton); 5 use base qw(IMPL::Config IMPL::Object::Singleton);
6 6
7 require IMPL::Web::Application::Action; 7 require IMPL::Web::Application::Action;
8 require IMPL::Web::Application::Response; 8 require IMPL::Web::Application::Response;
9 9
10 use IMPL::Class::Property; 10 use IMPL::Class::Property;
11 use CGI; 11 use CGI;
12 12
13 __PACKAGE__->PassThroughArgs;
14
13 BEGIN { 15 BEGIN {
14 public property handlerError => prop_all; 16 public property handlerError => prop_all;
15 public property factoryAction => prop_all; 17 public property factoryAction => prop_all;
16 public property handlersQuery => prop_all | prop_list; 18 public property handlersQuery => prop_all | prop_list;
19 public property configuration => prop_all;
17 } 20 }
18 21
19 # custom factory 22 # custom factory
20 sub new { 23 sub new {
21 my ($self,$file) = @_; 24 my ($self,$file) = @_;