          query-atom                 (get @client-query-cache   query-key)
          list-of-record-positions   (range (:start params) (inc (:end params)))
        ]
-    (log (pr-str ""))
+    ;(log (pr-str ""))
     ;(log (pr-str "populate: "  query-key " : " records))
     ;(log (pr-str "  database returned      : "  records))
     ;(log (pr-str "        : "  records-count))


         info
         (do
           (log "Client was disconnected")
           (doall (map
                    (fn[client-key]
                      (log (str "      RELOAD: "  client-key))
                      (>! client-query-cache-requests  {
                                                         :query-key     (dissoc (dissoc client-key :start) :end)

                                                         :subset-range  {
                                                                          :start    1
                                                                          :end      20
                                                                          } })
                      )
                    (keys @client-query-cache))))


         error
           (log "Error in response")


         :else

                    new-key2     (dissoc (dissoc xxx :start) :end)
                    ]

               ;(log "Client realtime query: " new-key2)
               (>! client-query-cache-requests  {
                                                  :query-key     new-key2

