Estandarizacion de nombres de clases. Adaptacion de Tabla a MECON_HTML_Tabla.

[mecon/samurai.git] / sistema / www / permisos / permisos.php

diff --git a/sistema/www/permisos/permisos.php b/sistema/www/permisos/permisos.php
index 622bfde11df282e277f010d194521ea368480d7f..19607a334feb66e9864ddf6ee49fa2dd423657d5 100644 (file)
--- a/sistema/www/permisos/permisos.php
+++ b/sistema/www/permisos/permisos.php
@@ -20,6 +20,11 @@
 // $Id$
 // 
     
+//VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
+    if (!$SAMURAI_PERM->tiene(SAMURAI_DEVELOPER)) {
+//        header('Location: error')
+    }
+//}}}
     require_once 'MECON/HTML/Tabla.php';
     require_once 'SAMURAI/Permiso.php';
 
@@ -36,8 +41,8 @@ if (!@$_SESSION['samurai']['id_sistema'] || !@$_SESSION['samurai']['login']) {
 }
 // }}}   
 //CREO LOS OBJETOS NECESARIOS {{{
-    $TABLA2 = new Tabla ('cellspacing=0');
-    $TABLA  = new Tabla ('cellpadding=2');
+    $TABLA2 = new MECON_HTML_Tabla ('cellspacing=0');
+    $TABLA  = new MECON_HTML_Tabla ('cellpadding=2');
 // }}}
 //OBTENGO LA INFORMACION DE LA BASE {{{
     $permisos = SAMURAI_Permiso::getPermisos($DB);