diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-12-06 16:13:32 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-12-06 16:13:32 +0000 |
| commit | 018303607f11609fa8c7900a359b0d55c96bb3ab (patch) | |
| tree | 405eacc355acca4b411f22c2ff3cc05a646057c3 /perl-install/install/any.pm | |
| parent | 02e1899aad9f954102e43e54364769efdbef0a55 (diff) | |
| download | drakx-018303607f11609fa8c7900a359b0d55c96bb3ab.tar drakx-018303607f11609fa8c7900a359b0d55c96bb3ab.tar.gz drakx-018303607f11609fa8c7900a359b0d55c96bb3ab.tar.bz2 drakx-018303607f11609fa8c7900a359b0d55c96bb3ab.tar.xz drakx-018303607f11609fa8c7900a359b0d55c96bb3ab.zip | |
(start_pushing_error,popup_errors,error) factorize "background" error handling
Diffstat (limited to 'perl-install/install/any.pm')
| -rw-r--r-- | perl-install/install/any.pm | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm index 6f211c991..d73d3ed44 100644 --- a/perl-install/install/any.pm +++ b/perl-install/install/any.pm @@ -325,20 +325,14 @@ sub setPackages { my ($suppl_method, $copy_rpms_on_disk); { - my @errors; - local $urpm->{error} = sub { - log::l("urpmi error: $_[0]"); - push @errors, @_; - }; + install::pkgs::start_pushing_error(); ($suppl_method, $copy_rpms_on_disk) = install::media::get_media($o, $media, $urpm); if ($suppl_method) { 1 while $o->selectSupplMedia; } install::media::update_media($urpm); - if (@errors) { - $::o->ask_warn(undef, N("An error occurred:") . "\n\n" . join("\n", @errors)); - } + install::pkgs::popup_errors(); } # actually read synthesis now we have all the ones we want: |