@@ -1089,11 +1089,11 @@
 ;;  - not appropriate for where all the runs are needed
 ;;
 (define (update-buttons tabdat uidat numruns numtests)
   (let* ((runs        (if (> (length (dboard:tabdat-allruns tabdat)) numruns)
 			  (take-right (dboard:tabdat-allruns tabdat) numruns)
-			  (pad-list (dboard:tabdat-allruns tabdat) numruns)))
+			  (pad-list   (dboard:tabdat-allruns tabdat) numruns)))
 	 (lftcol      (dboard:uidat-get-lftcol uidat))
 	 (tableheader (dboard:uidat-get-header uidat))
 	 (table       (dboard:uidat-get-runsvec uidat))
 	 (coln        0)
 	 (all-test-names (make-hash-table))