Mercurial > pub > Impl
view _test/Test/Web/Application.pm @ 250:129e48bb5afb
DOM refactoring
ObjectToDOM methods are virtual
QueryToDOM uses inflators
Fixed transform for the complex values in the ObjectToDOM
QueryToDOM doesn't allow to use complex values (HASHes) as values for nodes (overpost problem)
author | sergey |
---|---|
date | Wed, 07 Nov 2012 04:17:53 +0400 |
parents | 4d0e1962161c |
children |
line wrap: on
line source
package Test::Web::Application::Instance; package Test::Web::Application; use strict; use parent qw(IMPL::Test::Unit); use IMPL::Test qw(test failed); require IMPL::Web::Application; __PACKAGE__->PassThroughArgs; sub CTOR { # simulate CGI environment $ENV{PATH_TRANSLATED} = "Resources/simple.tt"; } test SpawnApp => sub { my $instance = spawn Test::Web::Application::Instance('Resources/app.xml'); return 1; }; test ActivateOnDemand => sub { my $instance = spawn Test::Web::Application::Instance('Resources/app.xml'); my $ds = $instance->dataSource; return 1; }; test SaveXml => sub { my $instance = spawn Test::Web::Application::Instance('Resources/app.xml'); $instance->xml or failed "xml property is invalid"; }; test Run => sub { my $instance = spawn Test::Web::Application::Instance('Resources/app.xml'); $instance->Run(); }; package Test::Web::Application::Instance; use parent qw(IMPL::Web::Application); __PACKAGE__->PassThroughArgs; use IMPL::Class::Property; BEGIN { public property name => prop_all; public property options => prop_all; public property dataSource => prop_all; public property securityMod => prop_all; } 1;