@@ -537,13 +537,10 @@
   (rmt:send-receive 'delete-run run-id (list run-id) area-dat))
 
 (define (rmt:delete-old-deleted-test-records area-dat)
   (rmt:send-receive 'delete-old-deleted-test-records #f '() area-dat))
 
-(define (rmt:get-runs runpatt count offset keypatts area-dat)
-  (rmt:send-receive 'get-runs #f (list runpatt count offset keypatts) area-dat))
-
 (define (rmt:get-runs runpatt count offset keypatts area-dat)
   (rmt:send-receive 'get-runs #f (list runpatt count offset keypatts) area-dat))
 
 (define (rmt:get-all-run-ids area-dat)
   (rmt:send-receive 'get-all-run-ids #f '() area-dat))