From 3f8c1fb32a39e437b3e68c6dbb800c0ab1711ee0 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ian.jackson@eu.citrix.com>
Date: Thu, 12 Mar 2015 15:59:03 +0000
Subject: [PATCH] convert-cabinet-layout: ARM wip

---
 convert-cabinet-layout | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/convert-cabinet-layout b/convert-cabinet-layout
index 9a49ae6..c526664 100755
--- a/convert-cabinet-layout
+++ b/convert-cabinet-layout
@@ -32,7 +32,9 @@ while (@ARGV && $ARGV[0] =~ m/^-/) {
     $_ = shift @ARGV;
     last if m/^\-\-?$/;
     if (s/^--only=//) {
-        $only = $_;
+        $only //= "";
+        $only .= " ";
+        $only .= $_;
         next;
     }
     for (;;) {
@@ -131,7 +133,7 @@ while (my $row = csv_row()) {
         push @hflags, "equiv-$kind", "hvm-$kindhvm";
     } elsif ($machine =~ m/^ARM-(\w+)-(\w+)$/) {
         my $kind = lc $1;
-        $machine = (lc $1).(lc $2);
+        $machine = lc "$1-$2";
         push @hflags, qw(arch-armhf arch-xen-armhf);
         push @hflags, qw(need-kernel-deb-armmp no-di-kernel need-uboot-bootscr);
         push @hflags, "blessed-commission-$kind", "blessed-commission-$machine";
-- 
2.39.5