deconnexion auto.
This commit is contained in:
parent
94a52169eb
commit
97e73a4fad
|
@ -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',
|
||||||
|
|
|
@ -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);
|
||||||
}
|
}
|
||||||
|
|
|
@ -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()
|
||||||
{
|
{
|
||||||
|
|
Reference in a new issue