johanels/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-12-12 06:24:17 +01:00
Code Issues Actions 9 Packages Projects Releases Wiki Activity

WIP

Browse Source
This commit is contained in:
Andrey Antukh
2025-08-13 11:47:11 +02:00
parent f75b7ea284
commit a124812f21
1 changed files with 3 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
backend/src/app/srepl/main.clj
View File

@@ -577,18 +577,16 @@
(l/dbg :hint "start job thread" :jid jid) (l/dbg :hint "start job thread" :jid jid)
(px/sleep 1000) (px/sleep 1000)
(loop [total 0] (loop []
(let [result (-> main/system (let [result (-> main/system
(assoc ::db/rollback rollback?) (assoc ::db/rollback rollback?)
(proc-fn opts))] (proc-fn opts))]
(l/dbg :hint "chunk processed" :jid jid :total total :chunk result)
(let [total (swap! processed + result)] (let [total (swap! processed + result)]
(l/dbg :hint "chunk processed" :jid jid :total total :chunk result) (l/dbg :hint "chunk processed" :jid jid :total total :chunk result ::l/sync? true)
(when (and (pos? result) (when (and (pos? result)
(< total max-items)) (< total max-items))
(recur total))))))] (recur))))))]
(l/dbg :hint "process:start" (l/dbg :hint "process:start"
:rollback rollback? :rollback rollback?