diff options
| author | Thierry Vignaud <tv@mageia.org> | 2013-03-05 18:32:53 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2013-03-05 18:32:53 +0000 |
| commit | 2531653f62417f8798ba53817bd5bdb90f3e2357 (patch) | |
| tree | eb7e86f35b517a58533e6d340d509b8e818d5a5c /perl-install/install/pkgs.pm | |
| parent | d0a6726835ca1eb8128ebe402dfde3178e571b17 (diff) | |
| download | drakx-backup-do-not-use-2531653f62417f8798ba53817bd5bdb90f3e2357.tar drakx-backup-do-not-use-2531653f62417f8798ba53817bd5bdb90f3e2357.tar.gz drakx-backup-do-not-use-2531653f62417f8798ba53817bd5bdb90f3e2357.tar.bz2 drakx-backup-do-not-use-2531653f62417f8798ba53817bd5bdb90f3e2357.tar.xz drakx-backup-do-not-use-2531653f62417f8798ba53817bd5bdb90f3e2357.zip | |
show all errors at once at end of installation
Diffstat (limited to 'perl-install/install/pkgs.pm')
| -rw-r--r-- | perl-install/install/pkgs.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm index c78234f34..d9d22dc05 100644 --- a/perl-install/install/pkgs.pm +++ b/perl-install/install/pkgs.pm @@ -856,6 +856,8 @@ sub _install_raw { # bug present in 2009.0, 2008.1, 2008.0, ... (probably since r11141 aka when switching to rpm-4.2 in URPM-0.83) local $packages->{options}{script_fd} = fileno $LOG; + start_pushing_error(); + log::l("rpm transactions start"); my $exit_code = urpm::main_loop::run($packages, $packages->{state}, undef, undef, { @@ -909,6 +911,11 @@ sub _install_raw { N("Installation of packages failed:") . "\n\n" . join("\n", @$errors)); } }, + completed => sub { + if (!$packages->{options}{auto}) { + popup_errors(); + } + }, message => sub { my ($title, $message) = @_; log::l($message); |