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