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; |
