diff options
author | Francois Pons <fpons@mandriva.com> | 2002-03-12 13:18:20 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2002-03-12 13:18:20 +0000 |
commit | 44229e906ecf2d0c60b1052a057a8babb9eb2c41 (patch) | |
tree | 3529cf9fc22ed43e903a55a745b29fddcb32074e /perl-install | |
parent | 25e2dfc33fffce9146a41ddfeb1656fdf43dc07a (diff) | |
download | drakx-44229e906ecf2d0c60b1052a057a8babb9eb2c41.tar drakx-44229e906ecf2d0c60b1052a057a8babb9eb2c41.tar.gz drakx-44229e906ecf2d0c60b1052a057a8babb9eb2c41.tar.bz2 drakx-44229e906ecf2d0c60b1052a057a8babb9eb2c41.tar.xz drakx-44229e906ecf2d0c60b1052a057a8babb9eb2c41.zip |
remove synthesis if not found (filesize is 0)
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/pkgs.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index a7e845a08..4877dc390 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -458,6 +458,7 @@ sub psUsingHdlist { my $newsf = "$prefix/var/lib/urpmi/synthesis.hdlist.$fakemedium.cz" . ($hdlist =~ /\.cz2/ && "2"); install_any::getAndSaveFile("Mandrake/base/synthesis.$hdlist", $newsf); $m->{synthesis_hdlist_size} = -s $newsf; #- keep track of size for post-check. + -s $newsf > 0 or unlink $newsf; #- avoid using more than one medium if Cd is not ejectable. #- but keep all medium here so that urpmi has the whole set. |