From c3ada7496b67f1d61390c28f991fc7c34bf2577e Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 26 Nov 2004 12:43:15 +0000
Subject: help perl_checker

---
 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 4f55c780e..13e61f9f4 100644
--- a/perl-install/network/ethernet.pm
+++ b/perl-install/network/ethernet.pm
@@ -104,7 +104,7 @@ sub get_eth_cards {
 
 sub get_eth_cards_names {
     my (@all_cards) = @_;
-    { map { $_->[0] => join(': ', $_->[0], $_->[2]) } @all_cards };
+    +{ map { $_->[0] => join(': ', $_->[0], $_->[2]) } @all_cards };
 }
 
 #- returns (link_type, mac_address)
-- 
cgit v1.2.1