@@ -1164,6 +1164,7 @@ sub selecthost ($) {
NestingLevel => 0,
Info => [],
};
+ $ho->{Arch} = target_var($ho, 'arch') or warn "unknown arch for $ident";
if (defined $job) {
$ho->{Suite} = target_var($ho, "suite") // $c{DebianSuite};
$ho->{DiVersion} = target_var($ho, "di_version")
@@ -1795,6 +1796,7 @@ sub selectguest ($$) {
Host => $ho,
Suite => $r{"${gn}_suite"},
};
+ $ho->{Arch} = target_var($ho, 'arch') or warn "unknown arch for $gn";
foreach my $opt (guest_var_commalist($gho,'options')) {
$gho->{Options}{$opt}++;
}
With existing flights these are $r{arch} and GUEST_arch. Nothing uses these yet. Signed-off-by: Ian Jackson <ian.jackson@eu.citrix.com> --- Osstest/TestSupport.pm | 2 ++ 1 file changed, 2 insertions(+)