turning off usages.

This commit is contained in:
2021-05-28 13:53:08 -07:00
parent f4e5b4ebe0
commit 057e88de30

View File

@@ -74,7 +74,6 @@
)) ))
(defn get-graphql [args] (defn get-graphql [args]
(let [usages (time (get-usages args))]
(->> (cond-> {:query {:find [(list 'pull '?e default-read)] (->> (cond-> {:query {:find [(list 'pull '?e default-read)]
:in ['$] :in ['$]
:where ['[?e :vendor/name]]} :where ['[?e :vendor/name]]}
@@ -84,7 +83,7 @@
(map #(cleanse (:id args) %)) (map #(cleanse (:id args) %))
(map <-datomic) (map <-datomic)
(map #(trim-usage % (limited-clients (:id args)))) (map #(trim-usage % (limited-clients (:id args))))
#_(map #(assoc % :usage (get usages (:db/id %))))))) #_(map #(assoc % :usage (get usages (:db/id %))))))
(defn get-by-id [id] (defn get-by-id [id]