From 6db1e42de1ada6b51507db1fd764e1a7d0fb239c Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Tue, 19 Apr 2005 21:38:02 +0000
Subject: fix typo

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

(limited to 'perl-install')

diff --git a/perl-install/network/ethernet.pm b/perl-install/network/ethernet.pm
index 87c7294b3..298ced456 100644
--- a/perl-install/network/ethernet.pm
+++ b/perl-install/network/ethernet.pm
@@ -133,7 +133,7 @@ sub update_iftab() {
     foreach my $intf (detect_devices::getNet()) {
         my ($link_type, $mac_address) = get_eth_card_mac_address($intf) or next;
         #- do not write zeroed MAC addresses in iftab, it confuses ifrename
-        $mac_address = /^[0:]+$/ and next;
+        $mac_address =~ /^[0:]+$/ and next;
         my $descriptor = ${{ ether => 'mac', ieee1394 => 'mac_ieee1394' }}{$link_type} or next;
         substInFile {
             s/^$intf\s+.*\n//;
-- 
cgit v1.2.1