summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-04-27 11:37:43 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-04-27 11:37:43 +0000
commit530d0e93a3d8e9b59495d2da676f142ab3136862 (patch)
treef7abad938fdfc92e21aafef8bec3f2bbdbea10d3 /perl-install/install_steps_interactive.pm
parent28b8238df46801a722a041996ed823b35953ce52 (diff)
downloaddrakx-530d0e93a3d8e9b59495d2da676f142ab3136862.tar
drakx-530d0e93a3d8e9b59495d2da676f142ab3136862.tar.gz
drakx-530d0e93a3d8e9b59495d2da676f142ab3136862.tar.bz2
drakx-530d0e93a3d8e9b59495d2da676f142ab3136862.tar.xz
drakx-530d0e93a3d8e9b59495d2da676f142ab3136862.zip
no_comment
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r--perl-install/install_steps_interactive.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index e1c62454e..23fcd6e89 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -131,6 +131,7 @@ You will be allowed to make powerfull but dangerous things here."),
developer => _("Development"),
server => _("Server"),
);
+ $o->set_help('selectInstallClass2');
$o->{installClass} = ${{reverse %c}}{$o->ask_from_list(_("Install Class"),
_("Which usage is your system used for ?"),
[ values %c ], $c{$o->{installClass}})};
@@ -408,7 +409,7 @@ sub configureNetwork($) {
my $intf = network::findIntf($o->{intf} ||= [], $_);
add2hash($intf, $last);
add2hash($intf, { NETMASK => '255.255.255.0' });
- $o->configureNetworkIntf($intf) or return;
+ $o->configureNetworkIntf($intf) or last;
$o->{netc} ||= {};
delete $o->{netc}{dnsServer};