Libreria de Perl terminada.

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

diff --git a/sistema/www/perfiles/perfiles.php b/sistema/www/perfiles/perfiles.php
index ecebec76c87d2522b7b9c485be096e12e2edf824..ed342c0181e1b4444b710951421a9b93ae2920b9 100644 (file)
--- a/sistema/www/perfiles/perfiles.php
+++ b/sistema/www/perfiles/perfiles.php
@@ -61,9 +61,6 @@ if (!@$_SESSION['samurai']['id_sistema']) {
     }
     //Genero la cabecera de la tabla
     $row   = array ('Id','Descripcion');
-    if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_TIPO)) {
-        $row[] = 'Tipo';
-    }    
     if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_MODIF)) {
         $row[] = 'Modif.';
     }    
@@ -81,9 +78,6 @@ if (!@$_SESSION['samurai']['id_sistema']) {
         $Elim  = ereg_replace('##ACCION##', 'e'             , $Elim      );
         $row = array ($perfil->getId(), $Popup);
         
-        if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_TIPO)) {
-            $row[] = $perfil->getTipo();
-        }    
         if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_MODIF)) {
             $row[] = $Modif;
         }