From 7ffbfe788a66305c3523f13d52038bd5f7ed4c44 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Thu, 3 Nov 2005 17:40:05 +0000
Subject: make it more readable

---
 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 50f4d3467..14e4575aa 100644
--- a/perl-install/network/network.pm
+++ b/perl-install/network/network.pm
@@ -221,7 +221,7 @@ sub write_wireless_conf {
     my $wireless_file = "$::prefix/etc/sysconfig/network-scripts/wireless.d/$ssid";
     write_interface_settings($ifcfg, $wireless_file);
     # FIXME: write only DHCP/IP settings here
-    substInFile { undef $_ if /^DEVICE=/ } $wireless_file;
+    substInFile { $_ = '' if /^DEVICE=/ } $wireless_file;
 }
 
 sub add2hosts {
-- 
cgit v1.2.1