X-Git-Url: https://git.llucax.com/mecon/meconlib.git/blobdiff_plain/d942f04e0f9c142a0a75da12787b06adf310f250..b83e9f960d1231b2232058c76aee8d90634d16de:/lib/MECON/Marco.php?ds=sidebyside

diff --git a/lib/MECON/Marco.php b/lib/MECON/Marco.php
index bfbb231..9d6f8db 100644
--- a/lib/MECON/Marco.php
+++ b/lib/MECON/Marco.php
@@ -30,7 +30,7 @@ require_once 'MECON/Marco/Menu.php';
 require_once 'MECON/Marco/MenuPrincipal.php';
 
 //Agregado para el uso de HTML_Page (Uso la version Original de Pear)
-require_once 'HTML/Page.php';
+require_once 'MECON/HTML/Page.php';
 require_once 'HTML/Table.php';
 
 //Defino los directorios por default
@@ -54,7 +54,7 @@ define ('ESTILO_GENERICO', 'marco.css'  );
  * @package MECON
  * @access public
  */
-class MECON_Marco extends HTML_Page {
+class MECON_Marco extends MECON_HTML_Page {
     /**
      * Array con los datos de configuracion del sistema.
      *
@@ -102,12 +102,7 @@ class MECON_Marco extends HTML_Page {
     function MECON_Marco($arch_configuracion, $obj_permiso = null) // ~X2C
     {
         //Creo el objeto pagina
-        parent::HTML_Page(array ('doctype'  => 'HTML 4.01 Transitional',
-                                 'charset'  => 'iso-8859-1'            ,
-                                 'lineend'  => 'unix'                  ,
-                                 'language' => 'es'                    ,
-                                 'cache'    => 'false'                 ,
-                                 'simple'   => 'true'                  ));
+        parent::MECON_HTML_Page();
         //Obtengo y arreglo la configuracion
         $this->_obtenerConfiguracion($arch_configuracion);
         //Agrego el objeto permiso a la configuracion
@@ -267,25 +262,6 @@ Si es un objeto debe tener un metodo toHtml y opcionalmente puede tener un getCS
     }
     // -X2C
 
-    // +X2C Operation 223
-    /**
-     * Redefinicion de la funcion que permite agregar objetos o html al body de la pagina
-Si es un objeto debe tener un metodo toHtml y opcionalmente puede tener un getCSS.
-     *
-     * @param  mixed $content Contenido a agregar en la pagina
-     *
-     * @return void
-     * @access public
-     */
-    function addBodyContent($content) // ~X2C
-    {
-        if ((is_object($content)) && (method_exists($content, 'getcss'))) {
-            $this->addStyleSheet($content->getCSS());
-        }
-        parent::addBodyContent($content);
-    }
-    // -X2C
-
     // +X2C Operation 224
     /**
      * Funcion que permite concatenar lo pasado como parametro al titulo del sistema
@@ -297,7 +273,14 @@ Si es un objeto debe tener un metodo toHtml y opcionalmente puede tener un getCS
      */
     function addSubTitle($subtitulo) // ~X2C
     {
-        $this->_configuracion['subtitulo'].= ' - '.$subtitulo;
+        if (is_a($subtitulo, 'mecon_html_link')) {
+            $subtitulo->updateAttributes(
+                array('class' => 'mecon_marco_subtitle'));
+        }
+        if (method_exists($subtitulo, 'tohtml')) {
+            $subtitulo = $subtitulo->toHtml();
+        }
+        $this->_configuracion['subtitulo'] .= ' - ' . $subtitulo;
     }
     // -X2C
 
@@ -363,7 +346,7 @@ Si es un objeto debe tener un metodo toHtml y opcionalmente puede tener un getCS
             return @$this->_configuracion[$clave];
         }
         else {
-            return $this->_configuracion 
+            return $this->_configuracion;
         }
     }
     // -X2C