Mercurial > pub > Impl
comparison _test/Test/Class/Template.pm @ 278:4ddb27ff4a0b
core refactoring
author | cin |
---|---|
date | Mon, 04 Feb 2013 02:10:37 +0400 |
parents | 56364d0c4b4f |
children |
comparison
equal
deleted
inserted
replaced
277:6585464c4664 | 278:4ddb27ff4a0b |
---|---|
17 use IMPL::template ( | 17 use IMPL::template ( |
18 parameters => [qw(TValue)], | 18 parameters => [qw(TValue)], |
19 declare => sub { | 19 declare => sub { |
20 my ($class) = @_; | 20 my ($class) = @_; |
21 | 21 |
22 public $class->CreateProperty( items => prop_get | owner_set | prop_list, { type => $class->TValue } ); | 22 $class->CreateProperty( items => prop_get | owner_set | prop_list, { type => $class->TValue } ); |
23 } | 23 } |
24 ); | 24 ); |
25 | 25 |
26 BEGIN { | 26 BEGIN { |
27 public property name => prop_all; | 27 public property name => prop_all; |