Index: http-transport.scm
==================================================================
--- http-transport.scm
+++ http-transport.scm
@@ -328,11 +328,11 @@
 ;;
 (define (http-transport:client-connect iface port)
   (let* ((api-url      (conc "http://" iface ":" port "/api"))
 	 (api-uri      (uri-reference (conc "http://" iface ":" port "/api")))
 	 (api-req      (make-request method: 'POST uri: api-uri))
-	 (server-dat   (vector iface port api-uri api-url api-req)))
+	 (server-dat   (vector iface port api-uri api-url api-req (current-seconds))))
     server-dat))
 
 ;; run http-transport:keep-running in a parallel thread to monitor that the db is being 
 ;; used and to shutdown after sometime if it is not.
 ;;

Index: rmt.scm
==================================================================
--- rmt.scm
+++ rmt.scm
@@ -62,11 +62,11 @@
   ;; clean out old connections
   (let ((expire-time (- (current-seconds) 60)))
     (for-each 
      (lambda (run-id)
        (let ((connection (hash-table-ref *runremote* run-id)))
-	 (if (> (http-transport:server-dat-get-last-access connection) expire-time)
+	 (if (< (http-transport:server-dat-get-last-access connection) expire-time)
 	     (begin
 	       (debug:print-info 0 "Discarding connection to server for run-id " run-id ", too long between accesses")
 	       (hash-table-delete! *runremote* run-id)))))
      (hash-table-keys *runremote*)))
   (let* ((run-id          (if rid rid 0))