Se corrige bug.

[mecon/samurai.git] / lib / SAMURAI / Perm.php

diff --git a/lib/SAMURAI/Perm.php b/lib/SAMURAI/Perm.php
index 44b84a0f352fc97a923e5dbeb4d4054e018ee5b7..a8148ae4179f7ea41f54486bf473259ba1c264e7 100644 (file)
--- a/lib/SAMURAI/Perm.php
+++ b/lib/SAMURAI/Perm.php
@@ -93,8 +93,9 @@ class SAMURAI_Perm {
     // +X2C Operation 381
     /**
      * Verifica si tiene un permiso.
-Se puede pasar parámetros variables con un identificador de permiso o un array, por ejemplo: $perm->tiene(1, 4, array(2, 5, 67), 12); Si tiene algún permiso devuelve true.
-Si no se pasa ningún párametro ($perm->tiene()), devuelve true si tiene un permiso (al menos uno) en el sistema actual.
+Se puede pasar parametros variables con un identificador de permiso o un array, por ejemplo: $perm->tiene(1, 4, array(2, 5, 67), 12); Si tiene algun permiso devuelve true.
+Si no se pasa ningun parametro ($perm->tiene()), devuelve true si tiene un permiso (al menos uno) en el sistema actual.
+@see chequear()
      *
      * @return bool
      * @access public
@@ -138,6 +139,21 @@ Si no se pasa ning
     }
     // -X2C
 
+    // +X2C Operation 388
+    /**
+     * @return void
+     * @access public
+     */
+    function chequear() // ~X2C
+    {
+        $args = func_get_args();
+        if (!call_user_func_array(array($this, 'tiene'), $args)) {
+            include 'MECON/includes/no_autorizado.html';
+            exit;
+        }
+    }
+    // -X2C
+
 } // -X2C Class :SAMURAI_Perm
 
 ?>
\ No newline at end of file