summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2008-09-01 09:13:25 +0000
committerPascal Rigaux <pixel@mandriva.com>2008-09-01 09:13:25 +0000
commit848081d301fc9c565c3bc5e1e938811b04769406 (patch)
treef514bf9ab5dc281fba28a30fd6757856a5631cfb /perl-install/any.pm
parent05cc815a368874128fdd8dce1ad079b64831c8d2 (diff)
downloaddrakx-848081d301fc9c565c3bc5e1e938811b04769406.tar
drakx-848081d301fc9c565c3bc5e1e938811b04769406.tar.gz
drakx-848081d301fc9c565c3bc5e1e938811b04769406.tar.bz2
drakx-848081d301fc9c565c3bc5e1e938811b04769406.tar.xz
drakx-848081d301fc9c565c3bc5e1e938811b04769406.zip
- if network access, configure urpmi with --mirrorlist --distrib,
and install updates. This replaces the previous "Install Updates" step. - this calls gurpmi.addmedia/urpmi.addmedia and gurpmi2/urpmi in chroot - we do not allow anymore to choose which updates are going to be updated (ie choosePackagesTree is not used for this anymore)
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm8
1 files changed, 7 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 123abbf3f..e63871c28 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -845,7 +845,13 @@ sub urpmi_add_all_media {
#- configure urpmi media if network is up
require network::tools;
return if !network::tools::has_network_connection();
- my $_wait = $in->wait_message(N("Please wait"), N("Please wait, adding media..."));
+ my $wait;
+ if ($binary eq 'urpmi.addmedia') {
+ $wait = $in->wait_message(N("Please wait"), N("Please wait, adding media..."));
+ } elsif ($in->isa('interactive::gtk')) {
+ mygtk2::destroy_previous_popped_and_reuse_window();
+ mygtk2::flush();
+ }
run_program::rooted($::prefix, $binary, '--distrib', '--mirrorlist', '$MIRRORLIST');
}