diff _test/SQL.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 16ada169ca75
children 6148f89bb7bf
line wrap: on
line diff
--- a/_test/SQL.t	Mon Mar 28 01:36:24 2011 +0400
+++ b/_test/SQL.t	Sat Apr 23 23:06:48 2011 +0400
@@ -3,15 +3,11 @@
 use lib '../Lib';
 use lib '.';
 
-use IMPL::Test::Plan;
-use IMPL::Test::TAPListener;
+use IMPL::Test qw(run_plan);
 
-my $plan = new IMPL::Test::Plan qw(
+run_plan( qw(
     Test::SQL::Schema
-);
-
-$plan->AddListener(new IMPL::Test::TAPListener);
-$plan->Prepare();
-$plan->Run();
+    Test::SQL::Traits
+) );
 
 1;