Corrijo HTML_Noticia para que Myrna quede contenta

[mecon/intranet.git] / sistema / www / servicios.php

diff --git a/sistema/www/servicios.php b/sistema/www/servicios.php
index ebc9544f9735821e31817f497a0b1b83105c0330..e1ba91dffec069de8eee1bf4394bb7168b10ee6b 100644 (file)
--- a/sistema/www/servicios.php
+++ b/sistema/www/servicios.php
@@ -3,5 +3,18 @@
   require_once '../local_lib/copete.php';
   $c = new Copete('servicios');
   echo $c->toHTML();
+
+  require_once '../local_lib/intranetdb.php';
+  require_once 'MECON/HTML/Arbol/ArbolDB.php';
+  $db = IntranetDB::connect();
+  $dbdata = array(
+       'db' => $db,
+       'tabla' => 'servicio',
+       'id' => 'servicio',
+       'nombre' => 'nombre',
+       'id_padre' => 'servicio_padre',
+       'link' => 'link');
+  $arbol = new HTML_ArbolDB($dbdata, '/MECON/images/arbol_noticias.gif');
+  echo $arbol->toHTML();
 ?>
 </body>