@@ -176,11 +176,11 @@
 (define (tasks:get-best-server mdb)
   (let ((res '())
 	(best #f))
     (sqlite3:for-each-row
      (lambda (id hostname interface port pid)
-       (set! res (cons (list hostname interface port pid) res))
+       (set! res (cons (list hostname interface port pid id) res))
        (debug:print-info 2 "Found existing server " hostname ":" port " registered in db"))
      mdb
      "SELECT id,hostname,interface,port,pid FROM servers
          WHERE strftime('%s','now')-heartbeat < 10
                AND mt_version=? ORDER BY start_time ASC LIMIT 1;" megatest-version)