@@ -676,11 +676,11 @@
 		     (else
 		      #f))))
     (cond
      ((and (list? host-port)
 	   (eq? (length host-port) 2))
-      (let* ((myrunremote (make-remote))
+      (let* ((myrunremote (make-and-init-remote *toppath*))
 	     (iface       (car host-port))
 	     (port        (cadr host-port))
 	     (server-dat  (client:connect iface port server-id myrunremote))
 	     (login-res   (rmt:login-no-auto-client-setup myrunremote)))
 	(http-transport:close-connections myrunremote)