* Recompress the Packages files separately just before generating

Release files. Closes: #423835, thanks to fjp for the patch.
This commit is contained in:
Steve McIntyre 2007-08-26 15:07:52 +00:00
parent fdf55985a4
commit a10d15179c
2 changed files with 15 additions and 6 deletions

2
debian/changelog vendored
View File

@ -70,6 +70,8 @@ debian-cd (3.0.3) UNRELEASED; urgency=low
* Remove Build-Dep-Indep on sysutils. Closes: #437497
* In build.sh, use $DI_CODENAME for installer task files rather than
$CODENAME - allows for sid builds more easily etc.
* Recompress the Packages files separately just before generating
Release files. Closes: #423835, thanks to fjp for the patch.
-- Joey Hess <joeyh@debian.org> Tue, 07 Aug 2007 18:57:05 -0700

View File

@ -350,17 +350,23 @@ sub md5_file {
return ($md5, $st->size);
}
sub recompress {
# Recompress the Packages and Sources files; workaround for bug
# #402482
my ($filename);
$filename = $File::Find::name;
if ($filename =~ m/\/.*\/(Packages|Sources)$/o) {
system("gzip -9c < $_ >$_.gz");
}
}
sub md5_files_for_release {
my ($md5, $size, $filename);
$filename = $File::Find::name;
# Recompress the Packages and Sources files; workaround for bug
# #402482
if ($filename =~ m/\/.*\/(Packages|Sources)$/o) {
system("gzip -9c < $_ >$_.gz");
}
if ($filename =~ m/\/.*\/(Packages|Sources|Release)/o) {
$filename =~ s/^\.\///g;
($md5, $size) = md5_file($_);
@ -521,6 +527,7 @@ sub finish_disc {
chdir "dists/$codename";
open(RELEASE, ">>Release") || die "Failed to open Release file: $!\n";
print RELEASE "MD5Sum:\n";
find (\&recompress, ".");
find (\&md5_files_for_release, ".");
close(RELEASE);
chdir("../..");