r26808 - /scripts/lookup-requirements

[gregoa at users.alioth.debian.org]

Author: gregoa
Date: Thu Nov 13 20:38:02 2008
New Revision: 26808

URL: http://svn.debian.org/wsvn/?sc=1&rev=26808
Log:
get host architecture instead of hard coding it

Modified:
    scripts/lookup-requirements

Modified: scripts/lookup-requirements
URL: http://svn.debian.org/wsvn/scripts/lookup-requirements?rev=26808&op=diff
==============================================================================
--- scripts/lookup-requirements (original)
+++ scripts/lookup-requirements Thu Nov 13 20:38:02 2008
@@ -10,7 +10,7 @@
 # packages or Debian packages' version is lower than the required
 
 # Needs to have Contents-$ARCH.gz and Packages.gz in the current
-# directory (ok, $ARCH is hard-coded atm).
+# directory.
 # Needs a META.yml file given as an argument
 
 # TODO: make it download Contents/Packages from the configured
@@ -35,7 +35,8 @@
 my $meta = LoadFile($ARGV[0]);
 my $requirements = $meta->{requires};
 
-my $contents = "Contents-amd64.gz";
+my $arch = qx/dpkg-architecture -qDEB_HOST_ARCH/; chomp $arch;
+my $contents = "Contents-$arch.gz";
 my $contents_cache = "Contents.cache";
 
 my $packages = "Packages.gz";