comparison Lib/IMPL/Config.pm @ 205:891c04080658

IMPL::Web::View fixed template selection, release candidate
author sergey
date Thu, 03 May 2012 01:00:02 +0400
parents d63f9a92d6d4
children 0f59b2de72af
comparison
equal deleted inserted replaced
204:d63f9a92d6d4 205:891c04080658
120 sub Exists { 120 sub Exists {
121 $_[0]->SUPER::get($_[1]) ? 1 : 0; 121 $_[0]->SUPER::get($_[1]) ? 1 : 0;
122 } 122 }
123 123
124 sub AppBase { 124 sub AppBase {
125 $AppBase 125 shift;
126 File::Spec->catdir($AppBase,@_);
126 } 127 }
127 128
128 sub ConfigBase { 129 sub ConfigBase {
129 $ConfigBase 130 shift;
131 File::Spec->catdir($ConfigBase,@_);
130 } 132 }
131 133
132 1; 134 1;
133 __END__ 135 __END__
134 136