diff Lib/IMPL/Class/PropertyInfo.pm @ 228:431db7034a88

Для синхронизации
author andrei <andrei@nap21.upri>
date Thu, 13 Sep 2012 17:55:01 +0400
parents a8db61d0ed33
children 6d8092d8ce1b
line wrap: on
line diff
--- a/Lib/IMPL/Class/PropertyInfo.pm	Fri Sep 07 16:32:17 2012 +0400
+++ b/Lib/IMPL/Class/PropertyInfo.pm	Thu Sep 13 17:55:01 2012 +0400
@@ -2,11 +2,9 @@
 use strict;
 use IMPL::_core::version;
 
-use IMPL::declare {
-	base =>{
-		'IMPL::Class::MemberInfo' => '@_'
-	}
-};
+use parent qw(IMPL::Class::MemberInfo);
+
+our %CTOR = ( 'IMPL::Class::MemberInfo' => '@_' );
 
 __PACKAGE__->mk_accessors(qw(Type Mutators canGet canSet ownerSet));