Libreria SAMURAI_Perm en Perl casi lista. Falta getObservaciones y verificar que...

[mecon/samurai.git] / sistema / www / usuarios / usuarios-datos.php

diff --git a/sistema/www/usuarios/usuarios-datos.php b/sistema/www/usuarios/usuarios-datos.php
index bb33f3cf4f608e0216c58b49c626fd025259e989..7f1faa382b3acdfbf2f38659af00456ec1f1bb68 100644 (file)
--- a/sistema/www/usuarios/usuarios-datos.php
+++ b/sistema/www/usuarios/usuarios-datos.php
@@ -21,7 +21,7 @@
 // 
 
 //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
 // 
 
 //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{

-$SAMURAI_PERM->chequear(SAMURAI_DEVELOPER);
+$SAMURAI_PERM->chequear(SAMURAI_PERM_USUARIO_ALTA, SAMURAI_PERM_USUARIO_BAJA, SAMURAI_PERM_USUARIO_MODIF, SAMURAI_PERM_DEVELOPER);

 //}}}
 //REQUIRE ONCE {{{
     //MECON {{{
 //}}}
 //REQUIRE ONCE {{{
     //MECON {{{


@@ -45,9 +45,10 @@ $SAMURAI_PERM->chequear(SAMURAI_DEVELOPER);
                                         'language' => 'es',
                                         'cache'    => 'false',
                                         'simple'   => 'true'));
                                         'language' => 'es',
                                         'cache'    => 'false',
                                         'simple'   => 'true'));

-        $PAGE->addStyleSheet('/MECON/css/general_estilos.css');
+        $PAGE->addStyleSheet('/MECON/css/marco.css');

         $FORM    = new MECON_HTML_QuickForm ('usuarios_datos','post','usuarios-datos');
         $FORM    = new MECON_HTML_QuickForm ('usuarios_datos','post','usuarios-datos');

-        $USUARIO = new SAMURAI_Usuario($DB, $_GET['login']);
+        $USUARIO = new SAMURAI_Usuario($DB, $_GET['login'],
+                $_SESSION['samurai']['id_sistema']);

     }
 // }}}
 
     }
 // }}}