summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-08-31 22:52:13 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-08-31 22:52:13 +0000
commit63746e561f4804236803986cc19de6664d95dc1c (patch)
treea7616c7c879bbffa73166862b064e9402cf6a8b4 /perl-install/install_steps_interactive.pm
parent49c296107afd9cf7efb7388830d9c5785b96fd9f (diff)
downloaddrakx-63746e561f4804236803986cc19de6664d95dc1c.tar
drakx-63746e561f4804236803986cc19de6664d95dc1c.tar.gz
drakx-63746e561f4804236803986cc19de6664d95dc1c.tar.bz2
drakx-63746e561f4804236803986cc19de6664d95dc1c.tar.xz
drakx-63746e561f4804236803986cc19de6664d95dc1c.zip
no_comment
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r--perl-install/install_steps_interactive.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 2a37a4f0d..9620d0be1 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -140,7 +140,7 @@ sub configureNetwork($) {
my @l = network::getNet() or return die _("no network card found");
my $last; foreach ($::expert ? @l : $l[0]) {
- my $intf = network::findIntf($o->{intf}, $_);
+ my $intf = network::findIntf($o->{intf} ||= [], $_);
add2hash($intf, $last);
add2hash($intf, { NETMASK => '255.255.255.0' });
$o->configureNetworkIntf($intf);