Index: megatest.scm
==================================================================
--- megatest.scm
+++ megatest.scm
@@ -408,11 +408,11 @@
 		  (print x))
 		targets)
       (set! *didsomething* #t)))
 
 (define (full-runconfigs-read)
-  (let* ((keys   (cdb:remote-run get-keys #f))
+  (let* ((keys   (cdb:remote-run db:get-keys #f))
 	 (target (if (args:get-arg "-reqtarg")
 		     (args:get-arg "-reqtarg")
 		     (if (args:get-arg "-target")
 			 (args:get-arg "-target")
 			 #f)))