jump to top on scroll

This commit is contained in:
Daniel O'Connell 2022-05-13 13:06:45 +02:00
parent 4aa84bb465
commit 47d1c4bdfa

View File

@ -166,6 +166,7 @@
(map #(assoc order :day (first %) :state (second %))
(:days order))))
(filter (comp days :day)) (group-by :day))]
(.scrollTo js/window 0 0)
{:db (assoc db
:start-date day
:current-days (map #(vector % (get filtered-orders %)) (sort days)))