From 51039844febe1dc7c3f7ac5b3409f00e1679ab76 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 31 Jul 2002 15:18:09 +0000
Subject: replace "$foo" with $foo

---
 perl-install/network/network.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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

diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm
index 9ae4e3f24..880b23aa6 100644
--- a/perl-install/network/network.pm
+++ b/perl-install/network/network.pm
@@ -153,7 +153,7 @@ sub add2hosts {
     open F, ">$file" or die "cannot write $file: $!";
     while (my ($ip, $v) = each %l) {
 	$ip or next;
-	print F "$ip";
+	print F $ip;
 	if ($v =~ /^\s/) {
 	    print F $v;
 	} else {
-- 
cgit v1.2.1