Mercurial > pub > Impl

comparison Lib/IMPL/Config/Path.pm @ 395:212cc86e470b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Code cleanup DateTime locale support for HTTP requests
author sergey
date Thu, 20 Feb 2014 01:33:03 +0400
parents 91bae9f41a9c
children
comparison
equal deleted inserted replaced
394:2c14f66efa08 395:212cc86e470b
13 die OpException->new("Invalid content") unless ref $data eq 'ARRAY' && @$data == 2; 13 die OpException->new("Invalid content") unless ref $data eq 'ARRAY' && @$data == 2;
14 14
15 my ($base,$path) = @$data; 15 my ($base,$path) = @$data;
16 16
17 my %types = ( 17 my %types = (
18 appBase => 'AppBase', 18 appBase => 'AppDir',
19 configBase => 'ConfigBase' 19 configBase => 'ConfigDir'
20 ); 20 );
21 21
22 my $method = $types{$base}; 22 my $method = $types{$base};
23 23
24 die OpException->new("Unsupported path type",$base) unless $method; 24 die OpException->new("Unsupported path type",$base) unless $method;