minor tweaks.
This commit is contained in:
@@ -120,7 +120,7 @@
|
||||
|
||||
(defn location_id->client-location [location]
|
||||
({"2RVBYER6QSV7W" ["NGAK" "MH"]
|
||||
"8JT71V8XGYAT3" ["NGKG" "NB"]
|
||||
#_#_"8JT71V8XGYAT3" ["NGKG" "NB"]
|
||||
"SCX0Y8CTGM1S0" ["NGE1" "UC"]
|
||||
"FNH5VRT890WK8" ["NGMJ" "SC"]
|
||||
"AMQ0NPA8FGDEF" ["NGPG" "SZ"]
|
||||
@@ -265,11 +265,11 @@
|
||||
(map (fn [x] [:db/retractEntity x]))))
|
||||
|
||||
(mount/defstate square-loader
|
||||
:start (scheduler/every (* 15 60 1000) upsert)
|
||||
:start (scheduler/every (* 13 60 1000) upsert)
|
||||
:stop (scheduler/stop square-loader))
|
||||
|
||||
(mount/defstate square-settlement-loader
|
||||
:start (scheduler/every (* 15 60 1000) upsert-settlements)
|
||||
:start (scheduler/every (* 14 60 1000) upsert-settlements)
|
||||
:stop (scheduler/stop square-settlement-loader))
|
||||
|
||||
(comment
|
||||
|
||||
Reference in New Issue
Block a user