Detect architecture in old buildd logs which add an "is".

[blhc/blhc.git] / bin / blhc

diff --git a/bin/blhc b/bin/blhc
index bfdcfc575ee7642ae81fff9faf6c86c2ae62dcc0..f2f0d6f1253055d81c918f23ca64670c37826b51 100755 (executable)
--- a/bin/blhc
+++ b/bin/blhc
@@ -771,6 +771,13 @@ foreach my $file (@ARGV) {
         if (not $arch
                 and index($line, 'dpkg-buildpackage: host architecture ') == 0) {
             $arch = substr $line, 37, -1; # -1 to ignore '\n' at the end
+
+            # Old buildd logs use e.g. "host architecture is alpha", remove
+            # the "is", otherwise debarch_to_debtriplet() will not detect the
+            # architecture.
+            if (index($arch, 'is ') == 0) {
+                $arch = substr $arch, 3;
+            }
         }
 
         # Ignore compiler warnings for now.