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