other small performance tweak.

This commit is contained in:
2022-12-06 20:43:06 -08:00
parent b2e55ee49e
commit b1bb058039

View File

@@ -27,7 +27,7 @@
(if (> try-count 4) false true))
(defn lookup-dates []
(->> (periodic/periodic-seq (time/plus (time/now) (time/days -50))
(->> (periodic/periodic-seq (time/plus (time/now) (time/days -15))
(time/now)
(time/days 5))
(map (fn [d]