summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2004-07-20 14:45:23 +0000
committerOlivier Blin <oblin@mandriva.org>2004-07-20 14:45:23 +0000
commitc4bc3ce434c4d352391ba8618fdfec4c123cc3c1 (patch)
tree2a92a5432fd78e56633c46fd61b02814d15839e7 /perl-install
parent52cf02b6dfee94fca599d61389898f018263fcda (diff)
downloaddrakx-c4bc3ce434c4d352391ba8618fdfec4c123cc3c1.tar
drakx-c4bc3ce434c4d352391ba8618fdfec4c123cc3c1.tar.gz
drakx-c4bc3ce434c4d352391ba8618fdfec4c123cc3c1.tar.bz2
drakx-c4bc3ce434c4d352391ba8618fdfec4c123cc3c1.tar.xz
drakx-c4bc3ce434c4d352391ba8618fdfec4c123cc3c1.zip
unused variable
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/network/netconnect.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 91c5ec7e2..15a5a7a8b 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -1396,7 +1396,7 @@ sub get_net_device() {
}
sub read_net_conf {
- my ($_prefix, $netcnx, $netc) = @_;
+ my (undef, $netcnx, $netc) = @_;
$netc->{$_} = $netcnx->{$_} foreach 'NET_DEVICE', 'NET_INTERFACE';
$netcnx->{$netcnx->{type}} ||= {};
}