 
   (let [ds-fields          (get  @client-datasource-fields   data-source)
         fields-atom        (atom fields)                            ]
+
+    (log (str "keep-client-fields-up-tp-date: " data-source ":" fields))
 
     (if (nil? ds-fields)
       (swap! client-datasource-fields  assoc  data-source  fields-atom)

                                 :data-session-id     @data-session-id
                                 :realtime            (get query :realtime)
                                 }]
         (log "**    :" record-request)
         (>! client-record-cache-requests   record-request)))
      )))

