3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-29 00:56:10 +02:00
Code Issues Projects Releases Packages Wiki Activity

🐛 Fix incorrect change detection on srepl helper process-file

Browse source
This commit is contained in:
Andrey Antukh 2024-02-13 11:14:54 +01:00
parent 39cb4a081b
commit e8a1c58c5d
2 changed files with 1 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

2
backend/src/app/srepl/helpers.clj
View file

@ -168,7 +168,7 @@
(update-fn file libs opts) (update-fn file libs opts)
(update-fn file opts))] (update-fn file opts))]
(when (and (some? file) (when (and (some? file')
(not (identical? file file'))) (not (identical? file file')))
(when validate? (cfv/validate-file-schema! file')) (when validate? (cfv/validate-file-schema! file'))
(let [file' (update file' :revn inc)] (let [file' (update file' :revn inc)]

3
backend/src/app/srepl/main.clj
View file

@ -380,9 +380,6 @@
"Apply a function to all files in the database, reading them in "Apply a function to all files in the database, reading them in
batches. Do not change data. batches. Do not change data.
The `on-file` parameter should be a function that receives the file
and the previous state and returns the new state.
Emits rollback at the end of operation." Emits rollback at the end of operation."
[on-file & {:keys [max-items start-at with-libraries?]}] [on-file & {:keys [max-items start-at with-libraries?]}]
(letfn [(get-candidates [conn] (letfn [(get-candidates [conn]