comparison lib/IMPL/Config/Include.pm @ 407:c6e90e02dd17 ref20150831

renamed Lib->lib
author cin
date Fri, 04 Sep 2015 19:40:23 +0300
parents
children
comparison
equal deleted inserted replaced
406:f23fcb19d3c1 407:c6e90e02dd17
1 package IMPL::Config::Include;
2 use strict;
3 use warnings;
4 use IMPL::require {
5 Conf => 'IMPL::Config',
6 Exception => 'IMPL::Exception'
7 };
8
9
10 sub restore {
11 my ($self,$data) = @_;
12
13 die Exception->new("A file name is required") if ref $data || not $data;
14
15 return Conf->spawn($data);
16 }
17
18 1;