 
 
 -----------------------------------------------------------"
-(defn update-view-for-query [ view-key  query-key ]
-
-  (let [   data-view-atom   (get @client-data-windows  view-key)    ]
-    ;(log (pr-str "Active view : " (get @ui-paths-v2  (:full-path view-key))))
+(defn update-view-for-query [ data-window-key  query-key ]
+
+  (let [   data-view-atom   (get @client-data-windows  data-window-key)    ]
+    ;(log (pr-str "Active view : " (get @ui-paths-v2  (:full-path data-window-key))))
 
     (cond
 

     ; if the query does match and is the current live view
     (and
         (= (@data-view-atom :query) query-key)
         (= (get @ui-paths-v2  (:full-path view-key))  view-key)
        )

     (let [

           view-start       (:start @data-view-atom)
           view-end         (:end @data-view-atom)

           data-source      (:data-source data-window-key)
           full-path        (:full-path data-window-key)
           ui-full-path     (conj full-path  :values)

           value-path   (conj full-path :values)
