diff Lib/IMPL/Config.pm @ 204:d63f9a92d6d4

+IMPL::Config::Include - simple way to include external config *IMPL::Web::Handler::TTView - finished template selecting mechanism (not tested)
author sergey
date Wed, 02 May 2012 17:42:47 +0400
parents 4d0e1962161c
children 891c04080658
line wrap: on
line diff
--- a/Lib/IMPL/Config.pm	Wed Apr 25 18:06:11 2012 +0400
+++ b/Lib/IMPL/Config.pm	Wed May 02 17:42:47 2012 +0400
@@ -16,6 +16,7 @@
 use IMPL::Serialization::XmlFormatter;
 
 our $ConfigBase ||= '';
+our $AppBase;
 
 sub LoadXMLFile {
     my ($self,$file) = @_;
@@ -120,6 +121,14 @@
     $_[0]->SUPER::get($_[1]) ? 1 : 0;
 }
 
+sub AppBase {
+	$AppBase
+}
+
+sub ConfigBase {
+	$ConfigBase
+}
+
 1;
 __END__