summaryrefslogtreecommitdiffstats
path: root/urpm
diff options
context:
space:
mode:
Diffstat (limited to 'urpm')
-rw-r--r--urpm/dudf.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/urpm/dudf.pm b/urpm/dudf.pm
index ec597617..e9988281 100644
--- a/urpm/dudf.pm
+++ b/urpm/dudf.pm
@@ -354,7 +354,9 @@ sub compute_pkgs_user {
sub write_dudf {
my ($self) = @_;
- if ($self->{force_dudf} != 0 || ($self->{exit_code} != 0 && ${$self->{dudf_urpm}}->{options}{auto} != 1)) {
+ if ( (!${$self->{dudf_urpm}}->{options}{auto}) &&
+ ( ($self->{exit_code} > 9) ||
+ (!$self->{exit_code} && $self->{force_dudf}) ) ) {
my $noexpr = N("Nn");
my $msg = N("A problem has been encountered. You can help Mandriva to improve package\ninstallation by uploading a DUDF report file.\nThis is a part of the Mancoosi european research project.\nMore at http://www.mancoosi.org\n");
$msg .= N("Do you want to upload to Mandriva a DUDF report?");