deconnexion auto.
This commit is contained in:
parent
94a52169eb
commit
97e73a4fad
3 changed files with 4 additions and 4 deletions
|
@ -41,8 +41,6 @@ sub Mail() {
|
|||
my $login;
|
||||
$sth->bind_columns(undef, \$login) && $sth->fetch();
|
||||
|
||||
$dbh->disconnect();
|
||||
|
||||
my $msg = new MIME::Lite
|
||||
From => 'evoauth@shaktiware.fr',
|
||||
To => 'aanriot@nerim.net',
|
||||
|
|
|
@ -58,8 +58,6 @@ sub Alter() {
|
|||
$sth->execute();
|
||||
$sth->finish();
|
||||
|
||||
$dbh->disconnect();
|
||||
|
||||
&Evoauth::Functions::Log("$ip [supprimee]");
|
||||
&Evoauth::Functions::Mail("Deconnexion", $ip);
|
||||
}
|
||||
|
|
|
@ -43,6 +43,10 @@ elseif ($statut == "1") {
|
|||
echo '</body></html>';
|
||||
}
|
||||
|
||||
else {
|
||||
kick("Accès non autorisé");
|
||||
}
|
||||
|
||||
// chargement des règles concernées
|
||||
function loadrules()
|
||||
{
|
||||
|
|
Reference in a new issue