Mercurial > pub > Impl

diff Lib/IMPL/Class/PropertyInfo.pm @ 274:8d36073411b1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
+Added AutoDispose class *code cleanups
author cin
date Wed, 30 Jan 2013 03:30:28 +0400
parents 6d8092d8ce1b
children 6253872024a4
line wrap: on
line diff
--- a/Lib/IMPL/Class/PropertyInfo.pm	Tue Jan 29 17:19:10 2013 +0400
+++ b/Lib/IMPL/Class/PropertyInfo.pm	Wed Jan 30 03:30:28 2013 +0400
@@ -5,7 +5,7 @@
 
 our %CTOR = ( 'IMPL::Class::MemberInfo' => '@_' );
 
-__PACKAGE__->mk_accessors(qw(Type Mutators canGet canSet ownerSet));
+__PACKAGE__->mk_accessors(qw(Type Mutators canGet canSet ownerSet isList));
 
 my %LoadedModules;
 
@@ -39,6 +39,10 @@
     eval {$_[0]->Class->_PropertyImplementor} or die new IMPL::Exception('Can\'t find a property implementor for the specified class',$_[0]->Class);
 }
 
+sub type {
+    goto &Type;
+}
+
 1;
 
 __END__