about summary refs log tree commit diff
path: root/users/grfn/bbbg/src/bbbg/db/attendee_check.clj
diff options
context:
space:
mode:
Diffstat (limited to 'users/grfn/bbbg/src/bbbg/db/attendee_check.clj')
-rw-r--r--users/grfn/bbbg/src/bbbg/db/attendee_check.clj6
1 files changed, 6 insertions, 0 deletions
diff --git a/users/grfn/bbbg/src/bbbg/db/attendee_check.clj b/users/grfn/bbbg/src/bbbg/db/attendee_check.clj
index 33ed98d4ff..492f786bd6 100644
--- a/users/grfn/bbbg/src/bbbg/db/attendee_check.clj
+++ b/users/grfn/bbbg/src/bbbg/db/attendee_check.clj
@@ -6,6 +6,12 @@
    [bbbg.user :as user]
    [bbbg.util.core :as u]))
 
+(defn create! [db params]
+  (db/insert! db :attendee-check
+              (select-keys params [::attendee/id
+                                   ::user/id
+                                   ::attendee-check/last-dose-at])))
+
 (defn attendees-with-last-checks
   [db attendees]
   (when (seq attendees)