summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-08-22 01:10:13 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-08-22 01:10:13 +0000
commit1a996ceb744f490f0183099640e7a1eb3ad039c1 (patch)
tree7e599599dc2cd1601dc1f86b7db223ceebc562a9 /perl-install/install_steps_interactive.pm
parente2df2b17c50af038bbfe15f5b6dd9a21c532ae5b (diff)
downloaddrakx-1a996ceb744f490f0183099640e7a1eb3ad039c1.tar
drakx-1a996ceb744f490f0183099640e7a1eb3ad039c1.tar.gz
drakx-1a996ceb744f490f0183099640e7a1eb3ad039c1.tar.bz2
drakx-1a996ceb744f490f0183099640e7a1eb3ad039c1.tar.xz
drakx-1a996ceb744f490f0183099640e7a1eb3ad039c1.zip
no_comment
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r--perl-install/install_steps_interactive.pm7
1 files changed, 3 insertions, 4 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 494c61d34..b4b4a122e 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -17,13 +17,13 @@ use install_steps;
use install_interactive;
use install_any;
use detect_devices;
+use netconnect;
use run_program;
use commands;
use devices;
use fsedit;
use network;
use raid;
-use netconnect;
use mouse;
use modules;
use lang;
@@ -517,7 +517,7 @@ such as ``mybox.mylab.myco.com''."),
#- (dam's)
if (!$::beginner && $o->ask_yesorno([ _("Modem Configuration") ],
_("Do you want to configure a ISDN connection for your system?"), 0)) {
- Netconnect::detect_isdn($o->{prefix}, $o->{isdn}, $o, bool($o->{pcmcia}));
+# netconnect::detect_isdn($o->{prefix}, $o->{isdn}, $o, bool($o->{pcmcia}));
}
}
@@ -657,8 +657,7 @@ USA")) || return;
my %h; $h{$_} = 1 foreach @{$u->{packages} || []};
$o->ask_many_from_list_ref('', _("Please choose the packages you want to install."),
\@packages, [ map { \$h{$_} } @packages ]) or return;
- $u->{packages} = [ grep { $h{$_} } @packages ];
- install_steps::installCrypto($o);
+ $o->pkg_install(@{$u->{packages} = [ grep { $h{$_} } @packages ]});
#- stop interface using ppp only.
$o->downNetwork('pppOnly');