Applies all of the feedback for the new page

2024-04-14 22:29:01 -07:00
parent 6031f15246
commit 71b5b9864c
10 changed files with 74 additions and 53 deletions
--- a/src/clj/auto_ap/query_params.clj
+++ b/src/clj/auto_ap/query_params.clj
@@ -61,9 +61,10 @@
    (dissoc
     (condp = (source-key query-params)
       "week"
-       (assoc query-params
-              start-date-key (time/plus (time/now) (time/days -7))
-              end-date-key (time/now))
+       (let [last-monday (atime/last-monday)]
+         (assoc query-params
+                start-date-key (time/plus last-monday (time/days -7))
+                end-date-key last-monday))

       "month"
       (assoc query-params