     (let [queries (keys @server-side-cached-queries)]
       (doall (for [query queries]
                (do
-                 (if (= (get query :db-table)   db-table)
+                 (if (= (get-table-name (get query :db-table))   db-table)
                    (do
                      ;(println (str "    "))
                      ;(println (str "    " "Query"))

                         response-atom    (:update-request @the-client)
                         ]
                     (if (not response-atom) (swap! the-query assoc  :update-request (atom {})))
                     (swap! (:update-request @the-client) assoc-in [:queries query] {:timestamp query-time})
                     ;(println (str "    responses: " (if response-atom @response-atom)))

                     ;                   (swap! (:update-request @the-query) assoc  1 2)
                     ))))))))


      ;(println (str "    " ))
      ;(println (str "    update-query-in-cache" ))
      ;(println (str "    " query))
      ;(println (str "     existing-query: "  existing-query))

      (if (not existing-query)
        (swap! server-side-cached-queries assoc  query (atom {:clients  (atom #{})})))



      ;(println (str "    server: " @(get @server-side-cached-queries   query)))

      (let [the-query        (get @server-side-cached-queries   query)
            clients-atom     (:clients @the-query)
