@@ -35,11 +35,11 @@
 ;; 
 ;; A single data structure for all the data used in a dashboard.
 ;; Share this structure between newdashboard and dashboard with the 
 ;; intent of converging on a single app.
 ;;
-(define *data* (make-vector 20 #f))
+(define *data* (make-vector 25 #f))
 (define (dboard:data-get-runs          vec)    (vector-ref  vec 0))
 (define (dboard:data-get-tests         vec)    (vector-ref  vec 1))
 (define (dboard:data-get-runs-matrix   vec)    (vector-ref  vec 2))
 (define (dboard:data-get-tests-tree    vec)    (vector-ref  vec 3))
 (define (dboard:data-get-run-keys      vec)    (vector-ref  vec 4))
@@ -57,10 +57,12 @@
 (define (dboard:data-get-statuses      vec)    (vector-ref vec 14))
 (define (dboard:data-get-logs-textbox  vec val)(vector-ref vec 15))
 (define (dboard:data-get-command       vec)    (vector-ref vec 16))
 (define (dboard:data-get-command-tb    vec)    (vector-ref vec 17))
 (define (dboard:data-get-target        vec)    (vector-ref vec 18))
+(define (dboard:data-get-run-name      vec)    (vector-ref vec 19))
+
 
 (define (dboard:data-set-runs!          vec val)(vector-set! vec 0 val))
 (define (dboard:data-set-tests!         vec val)(vector-set! vec 1 val))
 (define (dboard:data-set-runs-matrix!   vec val)(vector-set! vec 2 val))
 (define (dboard:data-set-tests-tree!    vec val)(vector-set! vec 3 val))
@@ -79,10 +81,11 @@
 (define (dboard:data-set-statuses!      vec val)(vector-set! vec 14 val))
 (define (dboard:data-set-logs-textbox!  vec val)(vector-set! vec 15 val))
 (define (dboard:data-set-command!       vec val)(vector-set! vec 16 val))
 (define (dboard:data-set-command-tb!    vec val)(vector-set! vec 17 val))
 (define (dboard:data-set-target!        vec val)(vector-set! vec 18 val))
+(define (dboard:data-set-run-name!      vec val)(vector-set! vec 19 val))
 
 (dboard:data-set-run-keys! *data* (make-hash-table))
 
 ;; List of test ids being viewed in various panels
 (dboard:data-set-curr-test-ids! *data* (make-hash-table))