open CONT, "zcat $filename|$what"
or die $!;
- while (<CONT>) { last if /^FILE/mo; }
- if (eof(CONT)) { # no header found
+ my $header_found = 0;
+ while (<CONT>) { /^FILE/mo && do { $header_found = 1; last };}
+ if (eof(CONT)) { # no header found or only header found
close CONT; # explicit close to reset $.
+ next if $header_found;
open CONT, "zcat $filename|$what";
}
while (<CONT>) {
for my $archive (@ARCHIVES) {
print "Reading $archive/$suite...\n";
- if (!-d "$TOPDIR/archive/$archive/$suite/") {
+ my $suite_dir = "$TOPDIR/archive/$archive/$suite";
+ if (!-d $suite_dir) {
print "\tseems not to exist, skipping...\n";
next;
}
- open PKG, "zcat $TOPDIR/archive/$archive/$suite/$what/{,debian-installer/}binary-*/Packages.gz|";
+ open PKG, "zcat $suite_dir/$what/binary-*/Packages.gz $suite_dir/$what/debian-installer/binary-*/Packages.gz|";
while (<PKG>) {
next if /^\s*$/;
my $data = "";
archives="us security"
sections="main multiverse restricted universe"
parts="$sections"
-suites="dapper dapper-updates dapper-backports edgy edgy-updates edgy-backports feisty feisty-updates feisty-backports gutsy gutsy-updates gutsy-backports hardy hardy-updates hardy-backports intrepid"
+suites="dapper dapper-updates dapper-backports feisty feisty-updates feisty-backports gutsy gutsy-updates gutsy-backports hardy hardy-updates hardy-backports intrepid"
dists="$suites"
priorities="required important standard optional extra"
architectures="i386 amd64 powerpc"
arch_dapper="i386 amd64 powerpc"
arch_dapper_updates="${arch_dapper}"
arch_dapper_backports="${arch_dapper}"
-arch_edgy="${arch_dapper}"
-arch_edgy_updates="${arch_edgy}"
-arch_edgy_backports="${arch_edgy}"
-arch_feisty="${arch_edgy}"
+arch_feisty="${arch_dapper}"
arch_feisty_updates="${arch_feisty}"
arch_feisty_backports="${arch_feisty}"
arch_gutsy="${arch_feisty}"
-%]
[%-
all_suites = [ 'dapper', 'dapper-updates', 'dapper-backports',
- 'edgy', 'edgy-updates', 'edgy-backports',
'feisty', 'feisty-updates', 'feisty-backports',
'gutsy', 'gutsy-updates', 'gutsy-backports',
'hardy', 'hardy-updates', 'hardy-backports',
'intrepid' ]
version_numbers = { dapper => '6.06LTS',
- edgy => '6.10',
feisty => '7.04',
gutsy => '7.10',
hardy => '8.04LTS'}
<hr>
<h2>News</h2>
<dl>
+<dt>2008-06-10</dt>
+<dd>
+<p>Removed edgy</p>
+</dd>
<dt>2008-04-28</dt>
<dd>
<p>Added intrepid</p>