@@ -381,10 +381,13 @@
     ;; the synchash calls modify the "data" hash
     (synchash:client-get 'db:get-runs  "get-runs" (length keypatts) data runname #f #f keypatts)
     ;; Now can calculate the run-ids
     (let* ((run-hash (hash-table-ref/default data "get-runs" #f))
 	   (run-ids (if run-hash (filter number? (hash-table-keys run-hash)) '())))
+      ;; (debug:print-info 2 "run-hash-keys: " (hash-table-keys run-hash))
+      ;; (debug:print-info 2 "run-hash: ")(pp (hash-table->alist run-hash))
+      ;; (debug:print-info 2 "run-ids: " run-ids)
       (synchash:client-get 'db:get-tests-for-runs "get-tests-for-runs" 0 data run-ids testpatt states statuses))))
 
 (define (newdashboard)
   (let* ((data     (make-hash-table))
 	 (keys     (cdb:remote-run db:get-keys #f))