diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-03-01 10:48:24 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-03-01 10:48:24 +0000 |
commit | 1ac2349ae9e3dbb5c0a7f8a01cacf29428bcd7fe (patch) | |
tree | 725603880fb78ad181d9a2a02c21f5cacb7ca0e4 /perl-install/install_steps_interactive.pm | |
parent | 47d47ee4572a6de788858c6fd05d5391b048173d (diff) | |
download | drakx-1ac2349ae9e3dbb5c0a7f8a01cacf29428bcd7fe.tar drakx-1ac2349ae9e3dbb5c0a7f8a01cacf29428bcd7fe.tar.gz drakx-1ac2349ae9e3dbb5c0a7f8a01cacf29428bcd7fe.tar.bz2 drakx-1ac2349ae9e3dbb5c0a7f8a01cacf29428bcd7fe.tar.xz drakx-1ac2349ae9e3dbb5c0a7f8a01cacf29428bcd7fe.zip |
do not use $o in crypto.pm, pass {distro_type} to mirrors() and bestMirror() instead
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r-- | perl-install/install_steps_interactive.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 0922af7ab..02f032b8f 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -780,9 +780,10 @@ Do you want to install the updates ?")), eval { my @mirrors = do { my $_w = $o->wait_message('', N("Contacting Mandrake Linux web site to get the list of available mirrors...")); - crypto::mirrors() }; + crypto::mirrors($o->{distro_type}); + }; #- if no mirror have been found, use current time zone and propose among available. - $u->{mirror} ||= crypto::bestMirror($o->{timezone}{timezone}); + $u->{mirror} ||= crypto::bestMirror($o->{timezone}{timezone}, $o->{distro_type}); $o->ask_from_({ messages => N("Choose a mirror from which to get the packages"), cancel => N("Cancel"), }, [ { separator => '|', |