Job truncation: sg-run-job: Pass testid to reap-ts

It's going to want this in a moment.

No functional change.

Signed-off-by: Ian Jackson <Ian.Jackson@eu.citrix.com>

diff --git a/sg-run-job b/sg-run-job
index b72c864475a4416e2de54088eda7a9cb38563816..0f2ac9cdd4a65a0aa140ffc8b50f437ff5b36484 100755 (executable)
--- a/sg-run-job
+++ b/sg-run-job
@@ -204,6 +204,7 @@ proc spawn-ts {iffail testid args} {
 
     set detstr "$flight.$jobinfo(job) $ts $real_args"
     set details [list $flight $jobinfo(job) $stepno $detstr $iffail_status]
+    lappend details $testid
     jobdb::logputs stdout "starting $detstr $testid"
 
     jobdb::spawn-step-commit $flight $jobinfo(job) $stepno $testid
@@ -246,6 +247,7 @@ proc reap-ts {reap} {
     upvar #0 reap_details($fh) details
     set detstr [lindex $details 3]
     set iffail [lindex $details 4]
+    set testid [lindex $details 5]
     jobdb::logputs stdout "awaiting $detstr"
     if {[catch { close $fh } emsg]} {
         set result $iffail