@@ -303,11 +303,11 @@
 
 ;; RADT => Matrix defstruct addition
 (defstruct dboard:graph-dat
     ((id           #f) : string)
     ((color        #f) : vector)
-    ((flag         #f) : boolean)
+    ((flag         #t) : boolean)
     ((cell         #f) : number)
     )
 
 ;; data for runs, tests etc. was used in run summary?
 ;;
@@ -1419,11 +1419,11 @@
                            #:alignment1 "ALEFT"
                            #:expand "YES" ;; "HORIZONTAL"
                            #:scrollbar "YES"
                            #:numcol 10
                            #:numlin 20
-                           #:numcol-visible (min 10)
+                           #:numcol-visible (min 8)
                            #:numlin-visible 1
                            #:click-cb
                            (lambda (obj row col status)
                              (let*
                                  ((graph-cell (conc row ":" col))
@@ -1431,11 +1431,21 @@
                                  (graph-flag  (dboard:graph-dat-flag graph-dat)))
                                (if graph-flag
                                    (dboard:graph-dat-flag-set! graph-dat #f)
                                    (dboard:graph-dat-flag-set! graph-dat #t))
                                (print "Toggling graph, need to work on updaters")
-                               ;;(run-times-tab-updater)
+                               (if (not (dboard:tabdat-running-layout tabdat))
+						     (begin
+						       (dashboard:run-times-tab-run-data-updater commondat tabdat tab-num)
+						       (dboard:tabdat-last-data-update-set! tabdat (current-seconds))
+						       (thread-start! (make-thread
+								       (lambda ()
+									 (dboard:tabdat-running-layout-set! tabdat #t)
+									 (dashboard:run-times-tab-layout-updater commondat tabdat tab-num)
+									 (dboard:tabdat-running-layout-set! tabdat #f))
+								       "run-times-tab-layout-updater"))))
+                               ;;(dboard:tabdat-view-changed-set! tabdat #t)
                                )))))
         (dboard:tabdat-graph-matrix-set! tabdat graph-matrix)
         (iup:attribute-set! graph-matrix "WIDTH0" 0)
         (iup:attribute-set! graph-matrix "HEIGHT0" 0)
         graph-matrix))
@@ -2918,16 +2928,15 @@
                                (graph-matrix-row (dboard:tabdat-graph-matrix-row tabdat))
                                (graph-cell       (conc graph-matrix-row ":" graph-matrix-col)) 
                                (graph-dat (make-dboard:graph-dat
                                                   id: fieldn
                                                   color: graph-color
-                                                  flag: #f
+                                                  flag: #t
                                                   cell: graph-cell
                                                   )))
                           (hash-table-set! graph-matrix-table fieldn graph-dat)
                           (hash-table-set! graph-cell-table graph-cell graph-dat)
-                          ;;(hash-table-set! graph-matrix-table fieldn graph-color)
                           (print "Graph data " graph-matrix-row " " graph-matrix-col " " fieldn " " graph-color " " graph-color-rgb " ")
                           (set! changed #t)
                           (iup:attribute-set! graph-matrix (conc graph-matrix-row ":"  graph-matrix-col) fieldn)
                           (iup:attribute-set! graph-matrix (conc "BGCOLOR" (conc graph-matrix-row ":"  graph-matrix-col)) graph-color-rgb)
                           (if (> graph-matrix-col 10)