@@ -359,10 +359,11 @@
 	    (begin
 	      (print-call-chain *default-log-port*)
 	      (debug:print-error 0 *default-log-port* " closing connection failed with error: " ((condition-property-accessor 'exn 'message) exn) ", exn=" exn))
 	    (close-connection! api-dat)
             (close-idle-connections!)
+	    (remote-conndat-set! runremote #f)
 	    #t))
 	#f)))
 
 
 (define (make-http-transport:server-dat)(make-vector 6))
@@ -393,11 +394,11 @@
 
 ;;
 ;; connect
 ;;
 (define (http-transport:client-connect iface port server-id)
-  (debug:print-info 0 *default-log-port* "Connecting to client at "iface":"port", with server-id "server-id)
+  (debug:print-info 2 *default-log-port* "Connecting to server at "iface":"port", id "server-id)
   (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 (current-seconds) server-id)))
     server-dat))