deconnexion auto.

This commit is contained in:
Alexandre Anriot 2005-09-15 09:03:14 +00:00
parent 94a52169eb
commit 97e73a4fad
3 changed files with 4 additions and 4 deletions

View file

@ -41,8 +41,6 @@ sub Mail() {
my $login; my $login;
$sth->bind_columns(undef, \$login) && $sth->fetch(); $sth->bind_columns(undef, \$login) && $sth->fetch();
$dbh->disconnect();
my $msg = new MIME::Lite my $msg = new MIME::Lite
From => 'evoauth@shaktiware.fr', From => 'evoauth@shaktiware.fr',
To => 'aanriot@nerim.net', To => 'aanriot@nerim.net',

View file

@ -58,8 +58,6 @@ sub Alter() {
$sth->execute(); $sth->execute();
$sth->finish(); $sth->finish();
$dbh->disconnect();
&Evoauth::Functions::Log("$ip [supprimee]"); &Evoauth::Functions::Log("$ip [supprimee]");
&Evoauth::Functions::Mail("Deconnexion", $ip); &Evoauth::Functions::Mail("Deconnexion", $ip);
} }

View file

@ -43,6 +43,10 @@ elseif ($statut == "1") {
echo '</body></html>'; echo '</body></html>';
} }
else {
kick("Accès non autorisé");
}
// chargement des règles concernées // chargement des règles concernées
function loadrules() function loadrules()
{ {