From 329105c08d86ac3a67cce70ca2f0beaea4285d76 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Wed, 5 Mar 2008 21:13:43 +0000 Subject: perl_checker fix --- lib/network/connection/ethernet.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/network/connection/ethernet.pm') diff --git a/lib/network/connection/ethernet.pm b/lib/network/connection/ethernet.pm index da83097..1e680af 100644 --- a/lib/network/connection/ethernet.pm +++ b/lib/network/connection/ethernet.pm @@ -438,7 +438,7 @@ sub get_eth_cards { # 4) try to lookup a device by hardware address for device description: # maybe should have we try sysfs first for robustness? my @devices = mapIntfToDevice($interface); - ($description) = $devices[0]->{description} if @devices; + ($description) = $devices[0]{description} if @devices; } # 5) try to match a device through sysfs for driver & device description: # (eg: ipw2100 driver for intel centrino do not support ETHTOOL) -- cgit v1.2.1