diff options
author | damien <damien@mandriva.com> | 2001-07-30 17:39:58 +0000 |
---|---|---|
committer | damien <damien@mandriva.com> | 2001-07-30 17:39:58 +0000 |
commit | 110e3deda634adc5876da17c0fbfa451ad2c652e (patch) | |
tree | ca407030e0a1c5bcd03fb68fcd9b2dec9bd25415 /perl-install/network/netconnect.pm | |
parent | cb2b34494ca1c81ddfd11a9636210a8ffa8016a6 (diff) | |
download | drakx-backup-do-not-use-110e3deda634adc5876da17c0fbfa451ad2c652e.tar drakx-backup-do-not-use-110e3deda634adc5876da17c0fbfa451ad2c652e.tar.gz drakx-backup-do-not-use-110e3deda634adc5876da17c0fbfa451ad2c652e.tar.bz2 drakx-backup-do-not-use-110e3deda634adc5876da17c0fbfa451ad2c652e.tar.xz drakx-backup-do-not-use-110e3deda634adc5876da17c0fbfa451ad2c652e.zip |
corrected ask_connect_now
Diffstat (limited to 'perl-install/network/netconnect.pm')
-rw-r--r-- | perl-install/network/netconnect.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index 044357413..b1c74ed2f 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -175,6 +175,7 @@ ifdown eth0 $conf{cable} and do { require network::ethernet; network::ethernet::configure_cable($netcnx, $netc, $intf, $first_time) or goto step_2 }; $conf{lan} and do { require network::ethernet; network::ethernet::configure_lan($netcnx, $netc, $intf, $first_time) or goto step_2 }; + step_2_1: if (keys %{$netc->{internet_cnx}} > 1) { $in->ask_from_entries_refH(_("Network Configuration Wizard"), _("You have configured multiple ways to connect to the Internet.\nChoose the one you want to use.\n\n" . if_(!$::isStandalone, "You may want to configure some profiles after the installation, in the Mandrake Control Center")), @@ -187,6 +188,8 @@ ifdown eth0 } $netc->{internet_cnx_choice} and write_cnx_script($netc); + $::isStandalone and ask_connect_now() or goto step_2_1; + step_3: my $m = _("Congratulation, The network and internet configuration is finished. |