From 17f6b7e4d5cedf1588a30f18bf4cc3df2b1df7e4 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Tue, 12 Mar 2002 13:18:52 +0000 Subject: remove old synthesis file, to make sure gzip can build a new one. --- perl-install/install_any.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'perl-install/install_any.pm') diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index d78b955e2..be9cef216 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -528,6 +528,7 @@ sub install_urpmi { #- build synthesis file if there are still not existing (ie not copied from mirror). if (-s "$prefix/var/lib/urpmi/synthesis.hdlist.$name.cz" <= 32) { + unlink "$prefix/var/lib/urpmi/synthesis.hdlist.$name.cz"; run_program::rooted($prefix, "parsehdlist", ">", "/var/lib/urpmi/synthesis.hdlist.$name", "--synthesis", "/var/lib/urpmi/hdlist.$name.cz"); run_program::rooted($prefix, "gzip", "-S", ".cz", "/var/lib/urpmi/synthesis.hdlist.$name"); -- cgit v1.2.1