Index: dashboard-tests.scm
==================================================================
--- dashboard-tests.scm
+++ dashboard-tests.scm
@@ -441,11 +441,12 @@
 							(let ((val (vector-ref hed (- colnum 1))))
 							  (iup:attribute-set! steps-matrix  (conc rownum ":" colnum)(if val (conc val) ""))
 							  (if (< colnum 6)
 							      (loop hed tal rownum (+ colnum 1))
 							      (if (not (null? tal))
-								  (loop (car tal)(cdr tal)(+ rownum 1) 1)))))))))
+								  (loop (car tal)(cdr tal)(+ rownum 1) 1))))
+							(iup:attribute-set! steps-matrix "REDRAW" "ALL"))))))
 					   (hash-table-set! widgets "StepsMatrix" proc)
 					   (proc testdat))
 					 steps-matrix)
 				       ;; populate the Test Data panel
 				       (iup:frame