From: Leandro Lucarella <llucax@gmail.com>
Date: Thu, 19 Feb 2004 20:48:32 +0000 (+0000)
Subject: - Se agrega el logout para la sesion de embperl
X-Git-Tag: svn_import~46
X-Git-Url: https://git.llucax.com/mecon/intranet.git/commitdiff_plain/4b902d520c1d6cae34d5e729da5565c8d290abd7

- Se agrega el logout para la sesion de embperl
---

diff --git a/sistema/www/logout.php b/sistema/www/logout.php
index b7ef649..2d1f336 100644
--- a/sistema/www/logout.php
+++ b/sistema/www/logout.php
@@ -1,4 +1,4 @@
 <?
 session_destroy();
-header('Location: noticias');
+header('Location: logout_perl.epl');
 ?>
diff --git a/sistema/www/logout_perl.epl b/sistema/www/logout_perl.epl
new file mode 100644
index 0000000..cd7c1ad
--- /dev/null
+++ b/sistema/www/logout_perl.epl
@@ -0,0 +1,12 @@
+[-
+if(!$udat{'user'})
+{$http_headers_out{'Location'}="./noticias.php";}
+-]
+
+[- 
+    for $key (keys %udat)
+    {    delete($udat{$key}) unless $key =~ /^_/;}
+	
+	$http_headers_out{'Location'}="./noticias.php";
+-]
+
diff --git a/sistema/www/sistemas.php b/sistema/www/sistemas.php
index ecc28ee..45b117f 100644
--- a/sistema/www/sistemas.php
+++ b/sistema/www/sistemas.php
@@ -59,18 +59,18 @@ require_once 'SAMURAI/constantes.php';
 $perm = new SAMURAI_Perm($_SESSION['usuario'], 0, $DB);
 $samurai = false;
 $sistemas = array();
-foreach ($sists as $i => $s) {
+foreach ($sists as $id => $s) {
     // Agrego los sistemas en los que tiene permiso.
     $perm->setSistema($s->sistema);
     if ($perm->tiene()) {
         // Si es SAMURAI hay que ver si ya no lo agregamos antes.
-        if ($s->sistema == SAMURAI_PERM) {
+        if ($id == SAMURAI_PERM) {
             if (!$samurai) {
                 $samurai = true;
-                $sistemas[] = $sists[$i];
+                $sistemas[] = $sists[$id];
             }
         } else { // Si no es SAMURAI lo agregamos incondicionalmente.
-            $sistemas[] = $sists[$i];
+            $sistemas[] = $sists[$id];
         }
     }
     // Si tiene permisos de SAMURAI en un sistema, hay que mostrar un link a