From: cajus <cajus@594d385d-05f5-0310-b6e9-bd551577e9d8>
Date: Wed, 27 Feb 2008 08:45:13 +0000 (+0000)
Subject: Removed buggy net resolver
X-Git-Url: https://git.tokkee.org/?a=commitdiff_plain;h=28513f8055075821c77d2f7b885fbce3da4587c2;p=gosa.git

Removed buggy net resolver


git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@9150 594d385d-05f5-0310-b6e9-bd551577e9d8
---

diff --git a/gosa-si/modules/SIPackages.pm b/gosa-si/modules/SIPackages.pm
index b038e3963..d04c2e527 100644
--- a/gosa-si/modules/SIPackages.pm
+++ b/gosa-si/modules/SIPackages.pm
@@ -16,7 +16,6 @@ use NetAddr::IP;
 use Net::LDAP;
 use Socket;
 use Net::hostent;
-use Net::DNS;
 use utf8;
 
 my $event_dir = "/usr/lib/gosa-si/server/events";
diff --git a/gosa-si/server/events/siTriggered.pm b/gosa-si/server/events/siTriggered.pm
index fe3a373f9..488cc14f1 100644
--- a/gosa-si/server/events/siTriggered.pm
+++ b/gosa-si/server/events/siTriggered.pm
@@ -157,7 +157,6 @@ sub detected_hardware {
 	# We need to create a base entry first (if not done from ArpHandler)
 	if($mesg->count == 0) {
 		&main::daemon_log("INFO: Need to create a new LDAP Entry for client $address", 6);
-		my $resolver=Net::DNS::Resolver->new;
 		my $ipaddress= $1 if $address =~ /^([0-9\.]*?):.*$/;
 		my $dnsname= gethostbyaddr(inet_aton($ipaddress), AF_INET) || $ipaddress;
 		my $cn = (($dnsname =~ /^(\d){1,3}\.(\d){1,3}\.(\d){1,3}\.(\d){1,3}/) ? $dnsname : sprintf "%s", $dnsname =~ /([^\.]+)\.?/);