annotate _test/object.t @ 165:76515373dac0
Added Class::Template,
Rewritten SQL::Schema
'use parent' directive instead of 'use base'
| author |
wizard |
| date |
Sat, 23 Apr 2011 23:06:48 +0400 |
| parents |
eb3e9861a761 |
| children |
ad93c9f4dd93 |
| rev |
line source |
|
49
|
1 #!/usr/bin/perl -w
|
|
|
2 use strict;
|
|
|
3 use lib '../Lib';
|
|
|
4 use lib '.';
|
|
|
5
|
|
|
6 use IMPL::Test::Plan;
|
|
|
7 use IMPL::Test::TAPListener;
|
|
|
8
|
|
|
9 my $plan = new IMPL::Test::Plan qw(
|
|
90
|
10 Test::Class::Meta
|
|
165
|
11 Test::Class::Template
|
|
49
|
12 Test::Object::Common
|
|
|
13 Test::Object::List
|
|
164
|
14 Test::Object::Fields
|
|
49
|
15 );
|
|
|
16
|
|
|
17 $plan->AddListener(new IMPL::Test::TAPListener);
|
|
|
18 $plan->Prepare();
|
|
|
19 $plan->Run();
|
