Mercurial > pub > Impl
diff lib/IMPL/Config/YAMLConfig.pm @ 419:bbc4739c4d48 ref20150831
working on IMPL::Config::Container
author | cin |
---|---|
date | Sun, 29 Jan 2017 10:30:20 +0300 |
parents | 3f38dabaf5cc |
children | 7798345304bc |
line wrap: on
line diff
--- a/lib/IMPL/Config/YAMLConfig.pm Mon Dec 28 15:11:35 2015 +0300 +++ b/lib/IMPL/Config/YAMLConfig.pm Sun Jan 29 10:30:20 2017 +0300 @@ -1,9 +1,23 @@ package IMPL::Config::YAMLConfig; use strict; +use IMPL::lang qw(:base); +use IMPL::Exception(); +use YAML::XS(); + +sub Load { + my ( $this, $container, $file ) = @_; + + $this->Configure( isscalar($file) + ? YAML::XS::Load( ${$file} ) + : YAML::XS::LoadFile($file) ); +} + sub Configure { - my ($this, $container, $config) = @_; + my ( $this, $container, $config ) = @_; + + } 1; @@ -13,4 +27,4 @@ =pod -=cut \ No newline at end of file +=cut