comparison Lib/Form/ValueItem/List.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 16ada169ca75
children
comparison
equal deleted inserted replaced
164:eb3e9861a761 165:76515373dac0
1 package Form::ValueItem::List; 1 package Form::ValueItem::List;
2 use Common; 2 use Common;
3 use base qw(Form::ValueItem); 3 use parent qw(Form::ValueItem);
4 4
5 BEGIN { 5 BEGIN {
6 DeclareProperty ListValues => ACCESS_READ; 6 DeclareProperty ListValues => ACCESS_READ;
7 DeclareProperty CurrentItem => ACCESS_READ; 7 DeclareProperty CurrentItem => ACCESS_READ;
8 } 8 }