comparison _test/Test/Web/TT.pm @ 166:4267a2ac3d46

Added Class::Template, Rewritten SQL::Schema 'use parent' directive instead of 'use base'
author wizard
date Sat, 23 Apr 2011 23:12:06 +0400
parents 9d24db321029
children 47dac58691ee
comparison
equal deleted inserted replaced
165:76515373dac0 166:4267a2ac3d46
1 package Test::Web::TT; 1 package Test::Web::TT;
2 use strict; 2 use strict;
3 use warnings; 3 use warnings;
4 use encoding 'cp1251'; 4 use encoding 'cp1251';
5 5
6 use base qw(IMPL::Test::Unit); 6 use parent qw(IMPL::Test::Unit);
7 use IMPL::Test qw(test failed); 7 use IMPL::Test qw(test failed);
8 use IMPL::Web::TT::Document; 8 use IMPL::Web::TT::Document;
9 __PACKAGE__->PassThroughArgs; 9 __PACKAGE__->PassThroughArgs;
10 10
11 test Creation => sub { 11 test Creation => sub {