Se agrega script de permisos de MySQL.

[mecon/ai.git] / sistema / local_lib / AI / Arbol.php

diff --git a/sistema/local_lib/AI/Arbol.php b/sistema/local_lib/AI/Arbol.php
index 499ef99ce4899a8471b163c9f8f1e578e936446c..aa7241b9aaa19718cb7291e8483c9d3a52728710 100644 (file)
--- a/sistema/local_lib/AI/Arbol.php
+++ b/sistema/local_lib/AI/Arbol.php
@@ -27,31 +27,28 @@
 // $Id$
 //
 
-// +X2C includes
 require_once 'MECON/HTML/ArbolDB.php';
-// ~X2C
 
-// +X2C Class 535 :AI_Arbol
 /**
- * Arbol para generar los menes.
+ * Arbol para generar los menúes.
  *
  * @package AI_Local
  * @access public
  */
 class AI_Arbol extends MECON_HTML_ArbolDB {
-    // ~X2C
 
-    // +X2C Operation 536
     /**
      * Constructor.
      *
-     * @param  mixed $objeto Objeto del cual generar el ?bol. Puede ser AI_GrupoSecciones, AI_Servicio o AI_Sistema.
-     * @param  DB &$db Base de datos de donde sacar los datos para el ?bol.
+     * @param  mixed $objeto Objeto del cual generar el árbol. Puede ser
+     *                       AI_GrupoSecciones, AI_Servicio o AI_Sistema.
+     * @param  DB &$db Base de datos de donde sacar los datos para el árbol.
+     * @param  bool $expandir Indica si debe expandirse el árbol.
      *
      * @return void
      * @access public
      */
-    function AI_Arbol($objeto, &$db) // ~X2C
+    function AI_Arbol($objeto, &$db, $expandir = true)
     {
         switch (get_class($objeto)) {
             case 'ai_gruposecciones':
@@ -68,6 +65,7 @@ class AI_Arbol extends MECON_HTML_ArbolDB {
                 $tipo   = 'sistema';
                 $titulo = 'SISTEMAS';
                 $tabla  = $tipo;
+                $expandir = true;
                 break;
         }
         $dbdata = array(
@@ -80,7 +78,7 @@ class AI_Arbol extends MECON_HTML_ArbolDB {
         );
         if ($tipo == 'grupo' or $tipo == 'servicio') {
             $dbdata['id_padre'] = $tipo . '_padre';
-        } elseif ($tipo == 'sistema') { // FIXME - horrible!!!
+        } elseif ($tipo == 'sistema') { // FIXME - es bastante poco ortodoxo esto.
             $dbdata =
                 array(
                     'tabla'         => "intranet.$tabla as A, samurai.sistema as S",
@@ -90,10 +88,9 @@ class AI_Arbol extends MECON_HTML_ArbolDB {
                 )
                 + $dbdata;
         }
-        parent::MECON_HTML_ArbolDB($dbdata, $titulo, $tipo.'?accion='.AI_MODIF.'&id=');
+        parent::MECON_HTML_ArbolDB($dbdata, $titulo, $tipo.'?accion='.AI_MODIF.'&id=', $expandir);
     }
-    // -X2C
 
-} // -X2C Class :AI_Arbol
+}
 
 ?>
\ No newline at end of file