Commit 57492e33 authored by Ricardo J. Mendez's avatar Ricardo J. Mendez
parent 437fbd29
......@@ -152,9 +152,12 @@
ignore-set (:ignore-set settings)
new-urls (->
(:url-times migrated)
(data/clean-up-by-time (- t (* 3 ms-day)) 3)
(data/clean-up-by-time (- t (* 7 ms-day)) 30)
(data/clean-up-by-time (- t (* 14 ms-day)) 300)
(data/clean-up-by-time (- t (* 21 ms-day)) 600)
(data/clean-up-by-time (- t (* 30 ms-day)) 1800)
(data/clean-up-by-time (- t (* 45 ms-day)) 9000)
(data/clean-up-ignored ignore-set))
site-data (:site-times migrated)
new-sites (if (not= new-urls (:url-times migrated))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment