@@ -67,10 +67,13 @@
 	     (begin
 	       (debug:print-info 1 "db write rate too high, starting a server, count=" count " start=" start " run-id=" run-id " queries-per-second=" queries-per-second)
 	       #t)
 	     #f))))
 
+;; if a server is either running or in the process of starting call client:setup
+;; else return #f to let the calling proc know that there is no server available
+;;
 (define (rmt:get-connection-info run-id)
   (let ((cinfo (hash-table-ref/default *runremote* run-id #f)))
     (if cinfo
 	cinfo
 	;; NB// can cache the answer for server running for 10 seconds ...
@@ -138,11 +141,15 @@
 		;; may kill it here but what are the criteria?
 		;; start with three calls then kill server
 		;; (if (eq? attemptnum 3)(tasks:kill-server-run-id run-id))
 		;; (thread-sleep! 2)
 		(rmt:send-receive cmd run-id params attemptnum: (+ attemptnum 1)))))
-	;; no connection info? try to start a server
+	;; no connection info? try to start a server, or access locally if no
+	;; server and the query is read-only
+	;;
+	;; Note: The tasks db was checked for a server in starting mode in the rmt:get-connection-info call
+	;;
 	(if (and (< attemptnum 15)
 		 (member cmd api:write-queries))
 	    (begin
 	      (hash-table-delete! *runremote* run-id)
 	      ;; (mutex-unlock! *send-receive-mutex*)