X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=bin%2Fparse-packages;h=15eae16c5fac1fe92eae311a28ff610f6fc673c0;hb=54975a59fc8a5a381f07b842f34bb6fc3a17b60a;hp=97edffcd19666bc4a438c7b1bfe1108a4ecfd132;hpb=b84419b2f87cf3c43b83fca71486be4fae81375e;p=deb%2Fpackages.git diff --git a/bin/parse-packages b/bin/parse-packages index 97edffc..15eae16 100755 --- a/bin/parse-packages +++ b/bin/parse-packages @@ -68,11 +68,12 @@ for my $suite (@SUITES) { 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 () { next if /^\s*$/; my $data = "";