Minor BugFix.

[mecon/samurai.git] / sistema / local_lib / prepend.php

diff --git a/sistema/local_lib/prepend.php b/sistema/local_lib/prepend.php
index 57331d5526739d7d5f0a6ace32711dc49347c9d5..fd3706d43a6a3e88ac3f76bfc32b0e482aad271d 100644 (file)
--- a/sistema/local_lib/prepend.php
+++ b/sistema/local_lib/prepend.php
@@ -5,18 +5,24 @@
 //prepend_include_path('/home/mmarrese/public_html/meconlib/lib/');
 
 require_once 'MECON/Marco.php';
 //prepend_include_path('/home/mmarrese/public_html/meconlib/lib/');
 
 require_once 'MECON/Marco.php';

+require_once 'MECON/HTML/Error.php';

 require_once 'SAMURAI/DB.php';
 require_once 'SAMURAI/Perm.php';
 require_once 'util.php';
 require_once 'SAMURAI/constantes.php';
 require_once 'SAMURAI/DB.php';
 require_once 'SAMURAI/Perm.php';
 require_once 'util.php';
 require_once 'SAMURAI/constantes.php';

-
-

 require_once 'MECON/Usuario.php';
 
 //Realizo la conexion con la base de datos
 $tmp = new SAMURAI_DB();
 $DB  =& $tmp->connect();
 
 require_once 'MECON/Usuario.php';
 
 //Realizo la conexion con la base de datos
 $tmp = new SAMURAI_DB();
 $DB  =& $tmp->connect();
 

+if (PEAR::isError($DB)) {
+    $ERROR = new MECON_HTML_Error($DB->getMessage());
+    echo $ERROR->toHtml();
+    exit;
+}
+
+

 //CARGO LAS VARIABLES DE SESION INTERNAS {{{
 if (!isset($_SESSION['usuario'])) {
     header('Location: /sistemas/intranet/login?redirect='.$_SERVER['REQUEST_URI']);
 //CARGO LAS VARIABLES DE SESION INTERNAS {{{
 if (!isset($_SESSION['usuario'])) {
     header('Location: /sistemas/intranet/login?redirect='.$_SERVER['REQUEST_URI']);