add some experiment code of datomic Entity API into repl session

GaiwanTeam · Aug 6, 2024 · a7b3f0a · a7b3f0a
1 parent 637f7fa
commit a7b3f0a
Showing 1 changed file with 21 additions and 1 deletion.
diff --git a/repl-sessions/init_db.clj b/repl-sessions/init_db.clj
@@ -63,4 +63,24 @@
 (type (-> session-entity
           :session/participants
           first))
-;; => co.gaiwan.compass.db.munged-entity
+;; => datomic.query.EntityMap
+
+(-> session-eid
+    db/entity
+    :session/type
+    db/entity
+    :session.type/color)
+;; => "var(--talk-color)"
+
+(-> session-eid
+    db/entity
+    :session/type
+    db/entity
+    (merge {}))
+
+;; => {:db/ident :session.type/keynote,
+;;     :session.type/name "Keynote",
+;;     :session.type/color "var(--talk-color)"}
+
+(db/pull '[* {:session/type [*]
+              :session/location [*]}] session-eid)