Executive: Fix an undef warning message

$onhost can be undef too

Signed-off-by: Ian Jackson <iwj@xenproject.org>

diff --git a/Osstest/Executive.pm b/Osstest/Executive.pm
index 80e7007019df47a9b16b5a7e4d8228faf881f797..a0d9f81e5c04e4302678fe1a0bf8ad416e729303 100644 (file)
--- a/Osstest/Executive.pm
+++ b/Osstest/Executive.pm
@@ -1283,7 +1283,8 @@ END
     return sub {
         my ($job, $hostidname, $onhost, $uptoincl_testid) = @_;
 
-       my $memokey = "$job $hostidname $onhost ".($uptoincl_testid//"");
+       my $memokey = "$job $hostidname "
+         .($onhost//"")." ".($uptoincl_testid//"");
        my $memo = $our_memo->{$memokey};
        return @$memo if $memo;