X-Git-Url: https://git.deb.at/?p=deb%2Fpackages.git;a=blobdiff_plain;f=bin%2Fparse-packages;h=a1c8d98dba4def0c44deaf17773305f4ceb58f74;hp=6f89070915800afb508d1d56c70bab4e18f721f9;hb=a6b39cb5eec2cf7d8a0d756f0090a9d8644443c9;hpb=d335139f37934f9128a39ffd0933a163fb71cce7 diff --git a/bin/parse-packages b/bin/parse-packages index 6f89070..a1c8d98 100755 --- a/bin/parse-packages +++ b/bin/parse-packages @@ -72,7 +72,8 @@ for my $suite (@SUITES) { print "\tseems not to exist, skipping...\n"; next; } - open PKG, "zcat $TOPDIR/archive/$archive/$suite/$what/{,debian-installer/}binary-*/Packages.gz|"; + open PKG, "zcat $TOPDIR/archive/$archive/$suite/$what/binary-*/Packages.gz" + . " $TOPDIR/archive/$archive/$suite/$what/debian-installer/binary-*/Packages.gz|"; while () { next if /^\s*$/; my $data = "";