@@ -92,11 +92,11 @@ (define (synchash:server-get db proc synckey keynum . params) ;; (debug:print-info 2 "synckey: " synckey ", keynum: " keynum ", params: " params) (let* ((synchash (hash-table-ref/default *synchashes* synckey #f)) (newdat (apply (case proc ((db:get-runs) db:get-runs) - ((db:get-tests-for-runs) db:get-tests-for-runs) + ((db:get-tests-for-runs-mindata) db:get-tests-for-runs-mindata) (else print)) db params)) (postdat #f) (make-indexed (lambda (x) (list (vector-ref x keynum) x))))