Index: tests/unittests/basicserver.scm
==================================================================
--- tests/unittests/basicserver.scm
+++ tests/unittests/basicserver.scm
@@ -79,11 +79,11 @@
 (thread-sleep! 2)
 (test #f #t (list? (rmt:general-open-connection *rmt:remote* *toppath* ".db/2.db")))
 
 (test #f '("SYSTEM" "RELEASE") (rmt:get-keys))
 (test #f 1 (rmt:send-receive 'register-run #f (list keyvals "run1" "new" "n/a" "justme" #f)))
-(test #t 1 (rmt:send-receive 'register-run run-id (list keyvals "run1" "new" "n/a" "justme" #f)))
+(test #t 1 (rmt:send-receive 'register-run 1 (list keyvals "run2" "new" "n/a" "justme" #f)))
 
 (test #f 1 (rmt:register-run keyvals "run2" "new" "n/a" "justme" #f))
 
 ;; (delete-file* "logs/1.log")
 ;; (define run-id 1)