 
 
 -----------------------------------------------------------"
-(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
 

           start-path   (conj full-path :start)
           order-path   (conj full-path :order)

           rel-path         (get view-key :relative-path)
           rel-value-path   (conj rel-path :values)
           rel-count-path   (conj rel-path :count)
           rel-end-path     (conj rel-path :end)

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

     (let [
