#!/usr/bin/perl

use warnings;
use strict;
use File::Spec;
use Cwd;

our $base_directory;

BEGIN {
    my @path = File::Spec->splitdir('/home/sites/teenliving/teenliving.org/cgi-bin/2'); # where are we running from
#    pop @path; # remove the 'html' directory
    my $inc_path = File::Spec->join( @path, 'lib' );
    $base_directory = File::Spec->join(@path);
    unshift @INC, $inc_path;
}

use TeenLivingProgram::CustomizedApp;

TeenLivingProgram::CustomizedApp->new(
    TMPL_PATH => File::Spec->join( $base_directory, 'templates' ),
    BASE_PATH => $base_directory,
    BASE_URL => 'http://www.teenliving.org/2',
)->run();