- Remove kernel cruft.

- Fix sorting in list2cds and cds2src (problematic with perl 5.8 and random
  hashes).
This commit is contained in:
Raphaël Hertzog 2004-01-29 00:39:07 +00:00
parent 0894490f10
commit 458a589244
4 changed files with 32 additions and 8 deletions

View File

@ -4,9 +4,36 @@ kernel-image-2.2.20-compact
kernel-image-2.2.20-idepci kernel-image-2.2.20-idepci
kernel-image-2.2.20-reiserfs kernel-image-2.2.20-reiserfs
kernel-image-2.4.18-bf2.4 kernel-image-2.4.18-bf2.4
kernel-image-2.6.0-test1-1-386 kernel-image-2.6.0-test11-1-386
kernel-image-2.6.0-test2-1-386 kernel-image-2.6.0-test9-1-386
emacs20 kernel-image-2.4.20-3-386
kernel-image-2.4.20-3-586tsc
kernel-image-2.4.20-3-686
kernel-image-2.4.20-3-686-smp
kernel-image-2.4.20-3-k6
kernel-image-2.4.20-3-k7
kernel-image-2.4.20-3-k7-smp
kernel-image-2.4.21-5-386
kernel-image-2.4.21-5-586tsc
kernel-image-2.4.21-5-686
kernel-image-2.4.21-5-686-smp
kernel-image-2.4.21-5-k6
kernel-image-2.4.21-5-k7
kernel-image-2.4.21-5-k7-smp
kernel-image-2.4.22-1-386
kernel-image-2.4.22-1-586tsc
kernel-image-2.4.22-1-686
kernel-image-2.4.22-1-686-smp
kernel-image-2.4.22-1-k6
kernel-image-2.4.22-1-k7
kernel-image-2.4.22-1-k7-smp
kernel-image-2.4.23-1-386
kernel-image-2.4.23-1-586tsc
kernel-image-2.4.23-1-686
kernel-image-2.4.23-1-686-smp
kernel-image-2.4.23-1-k6
kernel-image-2.4.23-1-k7
kernel-image-2.4.23-1-k7-smp
aspell-pt aspell-pt
aspell-fr aspell-fr
aspell-es aspell-es

View File

@ -4,9 +4,6 @@ kernel-image-2.2.20-compact
kernel-image-2.2.20-idepci kernel-image-2.2.20-idepci
kernel-image-2.2.20-reiserfs kernel-image-2.2.20-reiserfs
kernel-image-2.4.18-bf2.4 kernel-image-2.4.18-bf2.4
kernel-image-2.6.0-test1-1-386
kernel-image-2.6.0-test2-1-386
emacs20
aspell-pt aspell-pt
aspell-fr aspell-fr
aspell-es aspell-es

View File

@ -268,7 +268,7 @@ if ($extranonfree and (! $nonfree))
} }
# Now write the lists down # Now write the lists down
foreach (keys %cds) { foreach (sort {$a <=> $b} keys %cds) {
my $count = 0; my $count = 0;
open(CDLIST, "> $sdir/$_.sources") open(CDLIST, "> $sdir/$_.sources")
|| die "Can't write in $sdir/$_.sources: $!\n"; || die "Can't write in $sdir/$_.sources: $!\n";

View File

@ -282,7 +282,7 @@ foreach (glob("$dir/*.packages")) {
} }
# Now write the lists down # Now write the lists down
foreach (keys %cds) { foreach (sort { $a <=> $b } keys %cds) {
my $count = 0; my $count = 0;
open(CDLIST, "> $dir/$_.packages") open(CDLIST, "> $dir/$_.packages")
|| die "Can't write in $dir/$_.packages: $!\n"; || die "Can't write in $dir/$_.packages: $!\n";