diff options
Diffstat (limited to 'urpm/dudf.pm')
| -rw-r--r-- | urpm/dudf.pm | 4 |
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?"); |