summaryrefslogtreecommitdiffstats
path: root/perl-install/network.pm
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-04-02 12:22:46 +0000
committerdamien <damien@mandriva.com>2001-04-02 12:22:46 +0000
commit3100c29421ed9021c9a7a424ee7758e596a3d6a3 (patch)
tree6b953fcf6560b16d61758311e2be4da10e491d27 /perl-install/network.pm
parentef92f67e91dc84c65af33f55d46a015e34a8f6f4 (diff)
downloaddrakx-backup-do-not-use-3100c29421ed9021c9a7a424ee7758e596a3d6a3.tar
drakx-backup-do-not-use-3100c29421ed9021c9a7a424ee7758e596a3d6a3.tar.gz
drakx-backup-do-not-use-3100c29421ed9021c9a7a424ee7758e596a3d6a3.tar.bz2
drakx-backup-do-not-use-3100c29421ed9021c9a7a424ee7758e596a3d6a3.tar.xz
drakx-backup-do-not-use-3100c29421ed9021c9a7a424ee7758e596a3d6a3.zip
updated
Diffstat (limited to 'perl-install/network.pm')
-rw-r--r--perl-install/network.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/network.pm b/perl-install/network.pm
index 80e4e4524..9b21682d4 100644
--- a/perl-install/network.pm
+++ b/perl-install/network.pm
@@ -290,9 +290,9 @@ such as ``mybox.mylab.myco.com''."),
unlink "$prefix/etc/sysconfig/network-scripts/net_cnx_down";
undef $netc->{NET_DEVICE};
foreach (@l) {
- $intf->{$device}{IPADDR} =~ $ip_regexp;
+ $intf->{$_}{IPADDR} =~ $ip_regexp;
my $ip1=$1; my $ip2=$2; my $ip3=$3; my $ip4=$4;
- $intf->{$device}{NETMASK} =~ $ip_regexp;
+ $intf->{$_}{NETMASK} =~ $ip_regexp;
my $m1=$1; my $m2=$2; my $m3=$3; my $m4=$4;
$ip1&=$m1; $ip2&=$m2; $ip3&=$m3; $ip4&=$m4;
$netc->{GATEWAY} =~ $ip_regexp;