From ec747dc1097a5f80d220311dc89e9d6ec32cab31 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 28 Nov 2002 13:26:25 +0000
Subject: perl_checker adaptations

---
 perl-install/network/network.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/network/network.pm')

diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm
index b99bc38b7..35882507f 100644
--- a/perl-install/network/network.pm
+++ b/perl-install/network/network.pm
@@ -257,14 +257,14 @@ sub dns {
     my $mask = masked_ip($ip);
     my @masked = masked_ip($ip) =~ $ip_regexp;
     $masked[3]  = 2;
-    join (".", @masked);
+    join ".", @masked;
 
 }
 sub gateway {
     my ($ip) = @_;
     my @masked = masked_ip($ip) =~ $ip_regexp;
     $masked[3]  = 1;
-    join (".", @masked);
+    join ".", @masked;
 
 }
 
-- 
cgit v1.2.1