Mercurial > pub > Impl
comparison lib/IMPL/Config/ValueDescriptor.pm @ 422:b0481c071bea ref20150831
IMPL::Config::Container tests, YAMLConfiguration now works and tested
| author | cin |
|---|---|
| date | Sun, 20 Aug 2017 00:20:41 +0300 |
| parents | 7798345304bc |
| children |
comparison
equal
deleted
inserted
replaced
| 421:7798345304bc | 422:b0481c071bea |
|---|---|
| 27 | 27 |
| 28 sub Activate { | 28 sub Activate { |
| 29 my ( $this, $context ) = @_; | 29 my ( $this, $context ) = @_; |
| 30 return $this->value if $this->raw; | 30 return $this->value if $this->raw; |
| 31 | 31 |
| 32 my $services = $this->services; | 32 return $this->_ActivateValue( $this->value, $context ); |
| 33 | |
| 34 $context->EnterScope( '$value: ' . $this->value, $services ) if $services; | |
| 35 my $value = $this->_ActivateValue( $this->value, $context ); | |
| 36 $context->LeaveScope() if $services; | |
| 37 return $value; | |
| 38 } | 33 } |
| 39 | 34 |
| 40 sub _ActivateValue { | 35 sub _ActivateValue { |
| 41 my ( $this, $value, $context ) = @_; | 36 my ( $this, $value, $context ) = @_; |
| 42 | 37 |
| 55 else { | 50 else { |
| 56 return $value; | 51 return $value; |
| 57 } | 52 } |
| 58 } | 53 } |
| 59 | 54 |
| 55 sub GetName { | |
| 56 return '$value: ' . shift->value; | |
| 57 } | |
| 58 | |
| 60 1; | 59 1; |
