@@ -1256,11 +1256,12 @@
 	     (dcommon:command-tests-tasks-canvas tabdat test-records sorted-testnames tests-draw-state))))
 	   (tb (dboard:tabdat-runs-tree tabdat)))
       (dboard:commondat-add-updater 
        commondat 
        (lambda ()
-	 (dashboard:update-tree-selector tabdat))
+         (if (dashboard:database-changed? commondat tabdat context-key: 'run-control)
+             (dashboard:update-tree-selector tabdat)))
        tab-num: tab-num)
       result)))
 
  ;;(iup:frame
  ;; #:title "Logs" ;; To be replaced with tabs
@@ -1603,20 +1604,16 @@
                    (max-visible  (max (- (dboard:tabdat-num-tests tabdat) 15) 3)) ;; (dboard:tabdat-num-tests tabdat) is proportional to the size of the window
                    (numrows      1)
                    (numcols      1)
                    (changed      #f)
                    )
-
-              
-
-              
               
               (dboard:tabdat-filters-changed-set! tabdat #f)
               (let loop ((pass-num 0)
                          (changed  #f))
                 ;; Update the runs tree
-                (dboard:update-tree tabdat runs-hash runs-header tb)
+                ;; (dboard:update-tree tabdat runs-hash runs-header tb)
                 
                 (if (eq? pass-num 1)
                     (begin ;; big reset
                       (iup:attribute-set! run-matrix "CLEARVALUE" "ALL") ;; NOTE: Was CONTENTS
                       (iup:attribute-set! run-matrix "CLEARATTRIB" "CONTENTS")