summaryrefslogtreecommitdiffstats
path: root/urpm/main_loop.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2008-10-15 08:37:05 +0000
committerPascal Rigaux <pixel@mandriva.com>2008-10-15 08:37:05 +0000
commitd33b7d59ec240731585ccb77e5de5f978e0dd2b5 (patch)
tree1322c9d3df57d69e17ea8942225cfaf19c09dcdf /urpm/main_loop.pm
parente7dfa89b50ddcb96dc49200da0088d784af51dac (diff)
downloadurpmi-d33b7d59ec240731585ccb77e5de5f978e0dd2b5.tar
urpmi-d33b7d59ec240731585ccb77e5de5f978e0dd2b5.tar.gz
urpmi-d33b7d59ec240731585ccb77e5de5f978e0dd2b5.tar.bz2
urpmi-d33b7d59ec240731585ccb77e5de5f978e0dd2b5.tar.xz
urpmi-d33b7d59ec240731585ccb77e5de5f978e0dd2b5.zip
- urpmi
o diskspace issues are now a fatal error (need perl-URPM 3.18.1) (no use going on with the other transactions) (backported from trunk)
Diffstat (limited to 'urpm/main_loop.pm')
-rw-r--r--urpm/main_loop.pm9
1 files changed, 7 insertions, 2 deletions
diff --git a/urpm/main_loop.pm b/urpm/main_loop.pm
index bdeb1aac..5f87caa7 100644
--- a/urpm/main_loop.pm
+++ b/urpm/main_loop.pm
@@ -222,13 +222,18 @@ foreach my $set (@{$state->{transaction} || []}) {
%install_options_common,
);
if (@l) {
+ my ($raw_error, $translated) = partition { /^(badarch|bados|installed|badrelocate|conflicts|installed|diskspace|disknodes|requires|conflicts|unknown)\@/ } @l;
+ @l = @$translated;
+ my $fatal = grep { /^disk/ } @$raw_error;
+
#- Warning : the following message is parsed in urpm::parallel_*
my $msg = N("Installation failed:") . "\n" . join("\n", map { "\t$_" } @l) . "\n";
- if ($urpm->{options}{auto} || !$urpm->{options}{'allow-nodeps'} && !$urpm->{options}{'allow-force'}) {
- print $msg;
+ if ($fatal || $urpm->{options}{auto} || !$urpm->{options}{'allow-nodeps'} && !$urpm->{options}{'allow-force'}) {
++$nok;
++$urpm->{logger_id};
push @errors, @l;
+ $fatal and last;
+ print $msg;
} else {
$callbacks->{ask_yes_or_no}->(N("Installation failed"),
$msg . N("Try installation without checking dependencies? (y/N) ")) or ++$nok, next;