Index: rmt.scm
==================================================================
--- rmt.scm
+++ rmt.scm
@@ -472,13 +472,14 @@
 ;;======================================================================
 ;;  K E Y S 
 ;;======================================================================
 
 ;; These require run-id because the values come from the run!
+;; however the query must still apply to main.db
 ;;
 (define (rmt:get-key-val-pairs run-id)
-  (rmt:send-receive 'get-key-val-pairs run-id (list run-id)))
+  (rmt:send-receive 'get-key-val-pairs #f (list run-id)))
 
 (define (rmt:get-keys)
   (if *db-keys* *db-keys* 
      (let ((res (rmt:send-receive 'get-keys #f '())))
        (set! *db-keys* res)