]> git.llucax.com Git - mecon/intranet.git/blobdiff - sistema/www/servicios.php
Correcciones en los style sheets
[mecon/intranet.git] / sistema / www / servicios.php
index e1ba91dffec069de8eee1bf4394bb7168b10ee6b..bd80c91e7464ca77abe7a5ec0fd19275f86ecf47 100644 (file)
@@ -1,11 +1,10 @@
-<body bgcolor="#FFFFFF" class="subtitulo" link="#003366" vlink="#660066" alink="#0066FF" topmargin="0">
 <?
-  require_once '../local_lib/copete.php';
-  $c = new Copete('servicios');
-  echo $c->toHTML();
-
+  require_once '../local_lib/HTML_DietMarco.php';
   require_once '../local_lib/intranetdb.php';
   require_once 'MECON/HTML/Arbol/ArbolDB.php';
+  $m = new HTML_DietMarco('servicios');
+  $m->addTitle('Servicios');
+
   $db = IntranetDB::connect();
   $dbdata = array(
        'db' => $db,
@@ -15,6 +14,7 @@
        'id_padre' => 'servicio_padre',
        'link' => 'link');
   $arbol = new HTML_ArbolDB($dbdata, '/MECON/images/arbol_noticias.gif');
-  echo $arbol->toHTML();
+  
+  $m->addBodyContent($arbol);
+  $m->display();
 ?>
-</body>