diff _test/Test/Class/Meta.pm @ 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 dc1da0389db7
children 4d0e1962161c
line wrap: on
line diff
--- a/_test/Test/Class/Meta.pm	Mon Mar 28 01:36:24 2011 +0400
+++ b/_test/Test/Class/Meta.pm	Sat Apr 23 23:06:48 2011 +0400
@@ -1,7 +1,7 @@
 use strict;
 
 package Test::Class::Meta;
-use base qw(IMPL::Test::Unit);
+use parent qw(IMPL::Test::Unit);
 
 __PACKAGE__->PassThroughArgs;
 
@@ -46,12 +46,12 @@
 
 
 package Foo;
-use base qw(IMPL::Class::Meta);
+use parent qw(IMPL::Class::Meta);
 
 package Bar;
-use base qw(Foo);
+use parent qw(-norequire Foo);
 
 package Baz;
-use base qw(Foo);
+use parent qw(-norequire Foo);
 
 1;