Fix join button on session page

GaiwanTeam · Sep 3, 2024 · 6c8b1c2 · 6c8b1c2
1 parent ec7f833
commit 6c8b1c2
Show file tree

Hide file tree

Showing 3 changed files with 13 additions and 8 deletions.
diff --git a/resources/public/css/styles.css b/resources/public/css/styles.css
@@ -670,4 +670,10 @@ body {
 .sessions-session_form div.date-time {
   display: flex;
   gap: var(--size-2);
+}
+
+.sessions-join_btn input {
+  color: var(--text-2);
+  background-color: var(--surface-3);
+  border-radius: var(--radius-2);
 }
diff --git a/src/co/gaiwan/compass/db/queries.clj b/src/co/gaiwan/compass/db/queries.clj
@@ -7,7 +7,7 @@
 
 (defn session [id]
   (let [e (db/entity id)]
-    (-> (into {} e)
+    (-> (into {:db/id (:db/id e)} e)
         (update :session/type db/entity)
         (update :session/location db/entity)
         (assoc :session/signup-count (count (:session/participants e))))))

diff --git a/src/co/gaiwan/compass/html/sessions.clj b/src/co/gaiwan/compass/html/sessions.clj
@@ -64,18 +64,17 @@
 
 (declare session-card)
 
-(o/defstyled participate-btn c/form
+(o/defstyled join-btn c/form
   [:input {:color t/--text-2
            :background-color t/--surface-3
            :border-radius t/--radius-2}]
   ([session user]
    ;; Progressive enhancement, without htmx the form submission will kick in
    [:<>
     {:method "POST"
-     :action (str "/sessions/" (:db/id session) "/participate")}
+     :action (url-for :session/participate {:id (:db/id session)})}
     [:input {:type "submit"
-             :hx-post (str "/sessions/" (:db/id session) "/participate")
-             :hx-indicator (str "closest ." session-card)
+             :hx-post (url-for :session/participate {:id (:db/id session)})
              :hx-swap "none"
              :value
              (if (session/participating? session user)
@@ -87,7 +86,7 @@
   :mt-2
   ([session user]
    [:<>
-    [participate-btn session user]
+    [join-btn session user]
     [:a.btn {:href (str "/sessions/" (:db/id session))}
      "Details"]]))
 
@@ -156,7 +155,7 @@
 
     [:div.left
      [session-image+guage session user]
-     [participate-btn session user]]
+     [join-btn session user]]
 
     [:div.details
      [:h2.title
@@ -229,7 +228,7 @@
      (when (:session/ticket-required? session)
        [:p "Ticket Required"])
      [:div.actions
-      [participate-btn session user]
+      [join-btn session user]
       (when (or (user/admin? user)
                 (session/organizing? session user))
         [:<>