Mercurial > pub > Impl

annotate Lib/IMPL/Config/Include.pm @ 256:32aceba4ee6d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
corrected ViewHandlers to handle cookies and headers. Dirty hacks to handle binary data RestController doesn't deal with file extensions anymore.
author sergey
date Wed, 12 Dec 2012 04:29:50 +0400
parents d63f9a92d6d4
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
204
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
1 package IMPL::Config::Include;
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
2 use strict;
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
3 use warnings;
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
4 use IMPL::require {
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
5 Conf => 'IMPL::Config',
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
6 Exception => 'IMPL::Exception'
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
7 };
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
8
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
9
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
10 sub restore {
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
11 my ($self,$data) = @_;
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
12
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
13 die Exception->new("A file name is required") if ref $data || not $data;
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
14
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
15 return Conf->spawn($data);
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
16 }
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
17
d63f9a92d6d4 +IMPL::Config::Include - simple way to include external config
sergey
parents:
diff changeset
18 1;