 ;(println "Done count: " (query session find-done-count))
 
 
-;(cljs.pprint/pprint (entity session (:db/id (first (clara-tups->maps all-done)))))
-
-;(cljs.pprint/pprint (find-by-attribute session :ui/visibility-filter))
+(cljs.pprint/pprint (entity session (:db/id (first (clara-tups->maps all-done)))))
+(cljs.pprint/pprint  all-done)
+
+(cljs.pprint/pprint (find-by-attribute session :ui/visibility-filter))
 
 (defn entities-where
   "Returns hydrated entities matching an attribute-only or an attribute-value query"

  [:ui/visibility-filter [[e a v]] (= v :done)]
  [:todo/done [[e a v]] (= e ?e)]
  =>
  (insert! [?e :todo/visible :tag]))

;(defrule show-active


(def facts
  (apply concat
    [[(random-uuid) :today/is-friday :tag]]
    (map->tuple (toggle-tx (random-uuid) true))
    (map->tuple (visibility-filter-tx (random-uuid) :all))
    (mapv map->tuple (repeatedly 5 #(todo-tx (random-uuid) "TODO" nil)))))
