maurice/snix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

feat(grfn/bbbg): Filter signup form by rsvpd attending

Browse source 
Change-Id: Icf40fb125cc3fe9e1c70de2ac253d70349a213d2
Reviewed-on: https://cl.tvl.fyi/c/depot/+/4743
Reviewed-by: grfn <grfn@gws.fyi>
Autosubmit: grfn <grfn@gws.fyi>
Tested-by: BuildkiteCI
This commit is contained in:
Griffin Smith 2021-12-29 19:19:19 -05:00 • committed by clbot
parent 7a21189e0d
commit 89084c5696
1 changed files with 20 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

37
users/grfn/bbbg/src/bbbg/handlers/signup_form.clj
View file

@ -70,21 +70,24 @@
(defn signup-form-routes [{:keys [db]}]
(context "/signup-forms" []
(GET "/" request
(if-let [event (db/fetch db (db.event/today))]
(redirect (str "/signup-forms/" (::event/id event)))
(page-response (no-events-page
{:authenticated? (authenticated? request)}))))
(GET "/" request
(if-let [event (db/fetch db (db.event/today))]
(redirect (str "/signup-forms/" (::event/id event)))
(page-response (no-events-page
{:authenticated? (authenticated? request)}))))
(GET "/:event-id" [event-id]
(if-let [event (db/get db :event event-id)]
(let [attendees (db/list db
(->
(db.attendee/for-event event-id)
(merge-where [:or
[:= :attended nil]
[:not :attended]])))]
(page-response
(signup-page {:event event
:attendees attendees})))
(event-not-found)))))
(GET "/:event-id" [event-id]
(if-let [event (db/get db :event event-id)]
(let [attendees (db/list db
(->
(db.attendee/for-event event-id)
(merge-where
[:and
[:or
[:= :attended nil]
[:not :attended]]
:rsvpd_attending])))]
(page-response
(signup-page {:event event
:attendees attendees})))
(event-not-found)))))