diff options
Diffstat (limited to 'perl-install/any.pm')
| -rw-r--r-- | perl-install/any.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index 9b2730c0f..8a547e0d4 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -858,9 +858,11 @@ sub urpmi_add_all_media { require network::tools; return if !network::tools::has_network_connection(); my $wait; + my @options = ('--distrib', '--mirrorlist', '$MIRRORLIST'); if ($binary eq 'urpmi.addmedia') { $wait = $in->wait_message(N("Please wait"), N("Please wait, adding media...")); } elsif ($in->isa('interactive::gtk')) { + push @options, '--silent-success'; mygtk2::flush(); } @@ -870,7 +872,7 @@ sub urpmi_add_all_media { log::l("URPMI_ADDMEDIA_REASON $reason"); local $ENV{URPMI_ADDMEDIA_REASON} = $reason; - run_program::rooted($::prefix, $binary, '--distrib', '--mirrorlist', '$MIRRORLIST'); + run_program::rooted($::prefix, $binary, @options); } sub autologin { |