Mercurial > pub > Impl
comparison Lib/IMPL/Config/Container.pm @ 59:0f3e369553bd
Rewritten property implementation (probably become slower but more flexible)
Configuration infrastructure in progress (in the aspect of the lazy activation)
Initial concept for the code generator
| author | wizard |
|---|---|
| date | Tue, 09 Mar 2010 02:50:45 +0300 |
| parents | 16ada169ca75 |
| children | 76515373dac0 |
comparison
equal
deleted
inserted
replaced
| 58:a35b60b16a99 | 59:0f3e369553bd |
|---|---|
| 28 my $this = shift; | 28 my $this = shift; |
| 29 | 29 |
| 30 (my $prop = $AUTOLOAD) =~ s/.*?(\w+)$/$1/; | 30 (my $prop = $AUTOLOAD) =~ s/.*?(\w+)$/$1/; |
| 31 | 31 |
| 32 my $child = $this->Chidren->{$prop}; | 32 my $child = $this->Chidren->{$prop}; |
| 33 if (ref $child and $child->isa('IMPL::Config::Class')) { | 33 if (UNIVERSAL::isa($child,'IMPL::Config::Class')) { |
| 34 return $child->instance(@_); | 34 return $child->instance(@_); |
| 35 } else { | 35 } else { |
| 36 return $child; | 36 return $child; |
| 37 } | 37 } |
| 38 } | 38 } |
