Move dbg error http entrypoint handler to debug ns.

This commit is contained in:
Andrey Antukh 2021-12-30 16:01:36 +01:00
parent 758ffbf217
commit bf66b81702
6 changed files with 39 additions and 50 deletions

View file

@ -281,8 +281,6 @@
(defn- take-snapshot?
"Defines the rule when file `data` snapshot should be saved."
[{:keys [revn modified-at] :as file}]
;; The snapshot will be saved every 20 changes or if the last
;; modification is older than 3 hour.
(let [freq (or (cf/get :file-change-snapshot-every) 20)
timeout (or (cf/get :file-change-snapshot-timeout)
(dt/duration {:hours 1}))]