From: Frank Lichtenheld <frank@lichtenheld.de>
Date: Tue, 10 Jun 2008 21:18:36 +0000 (+0100)
Subject: [UBUNTU] Remove bashism in open() call
X-Git-Url: https://git.deb.at/w?a=commitdiff_plain;h=54975a59fc8a5a381f07b842f34bb6fc3a17b60a;p=deb%2Fpackages.git

[UBUNTU] Remove bashism in open() call

We delegate globbing to /bin/sh here, so don't assume
that is bash.
---

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 (<PKG>) {
 		next if /^\s*$/;
 		my $data = "";