Pull session for GET-session-card

GaiwanTeam · Aug 4, 2024 · 2463870 · 2463870
1 parent 2c4cdb7
commit 2463870
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/co/gaiwan/compass/routes/sessions.clj b/src/co/gaiwan/compass/routes/sessions.clj
@@ -32,7 +32,9 @@
 (defn GET-session-card [req]
   (let [session-eid (parse-long (get-in req [:path-params :id]))]
     {:html/body [session-html/session-card
-                 (db/entity session-eid)
+                 (db/pull '[* {:session/type [*]
+                               :session/location [*]
+                               :session.type [*]}] session-eid)
                  (:identity req)]}))
 
 (defn duration-string-to-iso8601