@@ -101,11 +101,11 @@
     ;; DOT MUTEXLOCK -> INIT_RUNREMOTE [label="no remote?"];
     ;; DOT INIT_RUNREMOTE -> MUTEXLOCK;
     ;; ensure we have a record for our connection for given area
     (if (not runremote)                   ;; can remove this one. should never get here.         
 	(begin
-	  (set! *runremote* (make-remote))
+	  (set! *runremote* (make-init-remote))
           (let* ((server-info (remote-server-info *runremote*))) 
             (if server-info
 		(begin
 			(remote-server-url-set! *runremote* (server:record->url server-info))
 			(remote-server-id-set! *runremote* (server:record->id server-info)))))  
@@ -182,11 +182,11 @@
      ;; on homehost and this is a write, we already have a server, but server has died
      ((and (cdr (remote-hh-dat runremote))           ;; on homehost
            (not (member cmd api:read-only-queries))  ;; this is a write
            (remote-server-url runremote)             ;; have a server
            (not (server:ping (remote-server-url runremote) (remote-server-id runremote))))  ;; server has died. NOTE: this is not a cheap call! Need better approach.
-      (set! *runremote* (make-remote))
+      (set! *runremote* (make-init-remote))
       (let* ((server-info (remote-server-info *runremote*))) 
             (if server-info
 		(begin
 		  (remote-server-url-set! *runremote* (server:record->url server-info))
                   (remote-server-id-set! *runremote* (server:record->id server-info)))))