From c9f504da9a36ba0bfb3d22bcf52303004d9454eb Mon Sep 17 00:00:00 2001
From: Alexandre Anriot <aanriot@evolix.fr>
Date: Wed, 12 Oct 2005 07:56:02 +0000
Subject: [PATCH] typos.

---
 admin/lib/Evoauth/Functions.pm |  2 +-
 admin/lib/Evoauth/Iptables.pm  | 10 +++++-----
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/admin/lib/Evoauth/Functions.pm b/admin/lib/Evoauth/Functions.pm
index 5d6ebb4..fb50aba 100644
--- a/admin/lib/Evoauth/Functions.pm
+++ b/admin/lib/Evoauth/Functions.pm
@@ -36,7 +36,7 @@ sub Mail() {
 	# récupération du login correspondant à l'ip
 	my $sql = "SELECT login FROM users where ip = '".$ip."'";
 
-	my $sth = $dbh->prepare($sql);;
+	my $sth = $dbh->prepare($sql);
 	$sth->execute();
 
 	my $login;
diff --git a/admin/lib/Evoauth/Iptables.pm b/admin/lib/Evoauth/Iptables.pm
index d9ab0c3..d43ee9b 100644
--- a/admin/lib/Evoauth/Iptables.pm
+++ b/admin/lib/Evoauth/Iptables.pm
@@ -31,7 +31,7 @@ sub Alter() {
 	if ($action == 1) {
 		system("/sbin/iptables -I EVOAUTH -s $ip -j ACCEPT 2>/dev/null");
 		&Evoauth::Functions::Log("[E] Connexion de $ip.") &&
-			&Evoauth::Functions::Mail("[E] Connexion de", $ip);
+			&Evoauth::Functions::Mail("[E] Connexion", $ip);
 	}
 
 	# mode vérification
@@ -55,7 +55,7 @@ sub Alter() {
 		$sth->finish();
 
 		&Evoauth::Functions::Log("[E] Déconnexion de $ip.") &&
-			&Evoauth::Functions::Mail("[E] Déconnexion de", $ip);
+			&Evoauth::Functions::Mail("[E] Déconnexion", $ip);
 	}
 }
 
@@ -91,14 +91,14 @@ sub check_iptables() {
 		if (defined($statut)) {
 			if ($statut != 1) {
 				&Evoauth::Functions::Log("[A] Suppression de $ip.") &&
-					&Evoauth::Functions::Mail("[A] Suppression de", $ip);
+					&Evoauth::Functions::Mail("[A] Suppression", $ip);
 				&Alter(3, $ip);
 			}
 		}
 
 		else {
 			&Evoauth::Functions::Log("[A] Suppression de $ip.") &&
-				&Evoauth::Functions::Mail("[A] Suppression de", $ip);
+				&Evoauth::Functions::Mail("[A] Suppression", $ip);
 			&Alter(3, $ip);
 		}
 	}
@@ -137,7 +137,7 @@ sub check_timestamp() {
 				# dernière connexion est < 1 min -> suppresion
 				&Alter(3, $ip);
 				&Evoauth::Functions::Log("[A] Suppression de $ip.") &&
-					&Evoauth::Functions::Mail("[A] Suppression de", $ip);
+					&Evoauth::Functions::Mail("[A] Suppression", $ip);
 			}
 
 			# sinon conservation