From 93a6631944036121af3c441fceb8342f9e551f11 Mon Sep 17 00:00:00 2001
From: rettenbe <rettenbe@594d385d-05f5-0310-b6e9-bd551577e9d8>
Date: Tue, 15 Jan 2008 09:23:38 +0000
Subject: [PATCH] change netaddr::ip::lite to netaddr::ip

git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@8341 594d385d-05f5-0310-b6e9-bd551577e9d8
---
 gosa-si/gosa-si-client | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/gosa-si/gosa-si-client b/gosa-si/gosa-si-client
index 3ae58a581..2608e323e 100755
--- a/gosa-si/gosa-si-client
+++ b/gosa-si/gosa-si-client
@@ -35,7 +35,7 @@ use Data::Dumper;
 use Sys::Syslog qw( :DEFAULT setlogsock);
 use File::Spec;
 use Cwd;
-use NetAddr::IP::Lite;
+use NetAddr::IP;
 use GOSA::GosaSupportDaemon;
 
 
@@ -363,7 +363,7 @@ sub get_local_mac_for_remote_ip {
 		$destination= sprintf("%d.%d.%d.%d", hex($a), hex($b), hex($c), hex($d));
 		($d,$c,$b,$a)=unpack('a2 a2 a2 a2', $Mask);
 		$mask= sprintf("%d.%d.%d.%d", hex($a), hex($b), hex($c), hex($d));
-		if(new NetAddr::IP::Lite($server_ip)->within(new NetAddr::IP::Lite($destination, $mask))) {
+		if(new NetAddr::IP($server_ip)->within(new NetAddr::IP($destination, $mask))) {
 			# destination matches route, save mac and exit
 			$result= &get_mac($Iface);
 			last;
@@ -1254,10 +1254,9 @@ GetOptions("h|help" => \&usage,
 &read_configfile;
 &check_pid;
 
-
-open STDIN, ‘/dev/null’ or die “Can’t read /dev/null: $!”;
-open STDOUT, ‘>>/dev/null’ or die “Can’t write to /dev/null: $!”;
-open STDERR, ‘>>/dev/null’ or die “Can’t write to /dev/null: $!”;
+open STDIN, '/dev/null' or die "Can’t read /dev/null: $!";
+open STDOUT, '>>/dev/null' or die "Can't write to /dev/null: $!";
+open STDERR, '>>/dev/null' or die "Can't write to /dev/null: $!";
 
 
 # restart daemon log file
-- 
2.30.2