about summary refs log tree commit diff
path: root/users/grfn/bbbg/src/bbbg/db/event.clj
diff options
context:
space:
mode:
authorGriffin Smith <grfn@gws.fyi>2021-12-26T16·51-0500
committerclbot <clbot@tvl.fyi>2021-12-26T17·23+0000
commitb175121101c110b75f978c02e01f4d16ddbf1074 (patch)
tree96c050cf28c60f4234ac0734c426aeee1416cfbb /users/grfn/bbbg/src/bbbg/db/event.clj
parenta68fe5b636fb0fb23cc09ee0bedfd686e44c75b2 (diff)
feat(grfn/bbbg): Style event list r/3432
Change-Id: I917e11e453126246c4110a6e42452dda4713b441
Reviewed-on: https://cl.tvl.fyi/c/depot/+/4667
Reviewed-by: grfn <grfn@gws.fyi>
Autosubmit: grfn <grfn@gws.fyi>
Tested-by: BuildkiteCI
Diffstat (limited to 'users/grfn/bbbg/src/bbbg/db/event.clj')
-rw-r--r--users/grfn/bbbg/src/bbbg/db/event.clj13
1 files changed, 12 insertions, 1 deletions
diff --git a/users/grfn/bbbg/src/bbbg/db/event.clj b/users/grfn/bbbg/src/bbbg/db/event.clj
index 41716499db..5e93691dfa 100644
--- a/users/grfn/bbbg/src/bbbg/db/event.clj
+++ b/users/grfn/bbbg/src/bbbg/db/event.clj
@@ -4,7 +4,8 @@
    [bbbg.db :as db]
    [bbbg.event :as event]
    [bbbg.util.sql :refer [count-where]]
-   [honeysql.helpers :refer [merge-group-by merge-left-join merge-select]]
+   [honeysql.helpers
+    :refer [merge-group-by merge-left-join merge-select merge-where]]
    [java-time :refer [local-date]]))
 
 (defn create! [db event]
@@ -32,6 +33,16 @@
   ([] (on-day (local-date)))
   ([db] (db/list db (today))))
 
+(defn upcoming
+  ([] (upcoming {:select [:event.*] :from [:event]}))
+  ([query]
+   (merge-where query [:>= :date (local-date)])))
+
+(defn past
+  ([] (past {:select [:event.*] :from [:event]}))
+  ([query]
+   (merge-where query [:< :date (local-date)])))
+
 (defn with-attendee-counts
   [query]
   (-> query