--- a/Lib/IMPL/Class/Meta.pm	Mon Mar 28 01:36:24 2011 +0400
+++ b/Lib/IMPL/Class/Meta.pm	Sat Apr 23 23:06:48 2011 +0400
@@ -107,7 +107,7 @@
 
 package InfoMeta;
 
-use base qw(IMPL::Object IMPL::Object::Autofill);
+use parent qw(IMPL::Object IMPL::Object::Autofill);
 use IMPL::Class::Property;
 
 __PACKAGE__->PassThroughArgs;
@@ -117,7 +117,7 @@
 }
 
 package InfoExMeta;
-use base qw(InfoMeta);
+use parent qw(InfoMeta);
 
 __PACKAGE__->PassThroughArgs;
 
@@ -215,7 +215,7 @@
 =begin code
 
 package Foo;
-use base qw(IMPL::Class::Meta);
+use parent qw(IMPL::Class::Meta);
 
 __PACKAGE__->class_data( info => { version => 1 } ); # will be default for all subclasses
 
@@ -226,7 +226,7 @@
 }
 
 package Bar;
-use base qw(Foo);
+use parent qw(Foo);
 
 __PACKAGE__->class_data('info')->{ language } = 'English';
 
@@ -249,12 +249,12 @@
 =begin code
 
 package Foo;
-use base qw(IMPL::Class::Meta);
+use parent qw(IMPL::Class::Meta);
 
 __PACKAGE__->static_accessor( info => { version => 1 } );
 
 package Bar;
-use base qw(Foo);
+use parent qw(Foo);
 
 __PACKAGE__->info->{language} = 'English'; # Foo->info->{language} will become 'English' to!!!
 __PACKAGE__->info({language => 'English'}); # will define own 'info' but will loose original data.