Revision 8 (by ahitrov@rambler.ru, 2010/03/29 11:46:38) Contenido UTF-8 core files
package Contenido::Globals;

# ----------------------------------------------------------------------------
# Здесь будут храниться все инициализирующие методы Contenido...
# Это НЕ объект, это просто пакет с процедурами...
# ----------------------------------------------------------------------------

use strict;
use vars qw($VERSION @ISA @EXPORT 
           $DEBUG_SQL $DEBUG_CORE $DEBUG $state $project $keeper $request $user $session $rpc_client $store_method $DB_TIME $CORE_TIME $DB_COUNT $HTML $log
           $RPC_TIME
);

use Exporter;
@ISA =      qw(Exporter);
@EXPORT =   qw($DEBUG_SQL $DEBUG_CORE $DEBUG $state $project $keeper $request $user $session $rpc_client $store_method $HTML $log);

$VERSION =  '1.0';

$state=undef;
$project=undef;
$keeper=undef;
$request=undef;
$user=undef;
$session=undef;
$rpc_client=undef;
$DEBUG=undef;
$DEBUG_SQL=undef;
$DEBUG_CORE=undef;
$store_method = undef;
$log = undef;

$DB_TIME = undef;
$DB_COUNT = undef;
$CORE_TIME = undef;
$RPC_TIME = undef;

1;