🎉 Add helpers for create datetimes in the past.

backend/src/app/util/time.clj

@@ -45,6 +45,10 @@
   [d ta]
   (.plus d ^TemporalAmount ta))
 
+(defn minus
+  [d ta]
+  (.minus d ^TemporalAmount ta))
+
 (defn- obj->duration
   [{:keys [days minutes seconds hours nanos millis]}]
   (cond-> (Duration/ofMillis (if (int? millis) ^long millis 0))
@@ -81,6 +85,10 @@
   [v]
   (plus (now) (duration v)))
 
+(defn in-past
+  [v]
+  (minus (now) (duration v)))
+
 (defn duration-between
   [t1 t2]
   (Duration/between t1 t2))