diff options
-rw-r--r-- | urpm.pm | 16 | ||||
-rw-r--r-- | urpme | 2 | ||||
-rw-r--r-- | urpmi.spec | 6 |
3 files changed, 17 insertions, 7 deletions
@@ -1943,7 +1943,7 @@ sub get_source_packages { #- return a list of package ready for rpm. sub download_source_packages { my ($urpm, $local_sources, $list, %options) = @_; - my (%sources, %removables); + my (%sources, %error_sources, %removables); #- make sure everything is correct on input... @{$urpm->{media} || []} == @$list or return; @@ -2085,17 +2085,23 @@ sub download_source_packages { }; if ($@) { $urpm->{log}(_("...retrieving failed: %s", $@)); - delete @sources{keys %distant_sources}; + #delete @sources{keys %distant_sources}; } - #- clean files that have not been downloaded. + #- clean files that have not been downloaded, but keep mind there + #- has been problem downloading them at least once, this is + #- necessary to keep track of failing download in order to + #- present the error to the user. foreach (keys %distant_sources) { - -s $sources{$_} or delete $sources{$_}; + -s $sources{$_} or $error_sources{$_} = delete $sources{$_}; } } } + #- clean failed download which have succeeded. + delete @error_sources{keys %sources}; + #- return the hash of rpm file that have to be installed, they are all local now. - %$local_sources, %sources; + %$local_sources, %sources, %error_sources; } #- extract package that should be installed instead of upgraded, @@ -189,7 +189,7 @@ if (@toremove > @l && !$auto) { $sum += $state->{ask_remove}{$_}{size}; } my $msg = _("To satisfy dependencies, the following packages are going to be removed (%d MB)", toMb($sum)); - print STDOUT "$msg:\n@toremove\n$askok" . _(" (Y/n) "); + print STDOUT "$msg:\n" . join("\n", sort { $a cmp $b } @toremove) . "\n$askok" . _(" (Y/n) "); <STDIN> =~ /[$noexpr]/ and exit 0; } @@ -2,7 +2,7 @@ Name: urpmi Version: 4.1 -Release: 12mdk +Release: 13mdk License: GPL Source0: %{name}.tar.bz2 Source1: %{name}.logrotate @@ -204,6 +204,10 @@ fi %changelog +* Wed Dec 11 2002 François Pons <fpons@mandrakesoft.com> 4.1-13mdk +- fixed error management about missing files after download. +- fixed urpme dependencies output to be user friendly. + * Wed Dec 11 2002 François Pons <fpons@mandrakesoft.com> 4.1-12mdk - fix symlink download with wget. - urpme now print possible errors. |