github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-10-31 23:10:31 +00:00
Code Issues Packages Projects Releases Wiki Activity

📎 Assert materialization against the ordinary storage path

Browse Source
This commit is contained in:
Álvaro Tejero Cantero 2026-08-14 01:00:56 +02:00
parent bdcb979211
commit 04c60331b6
No known key found for this signature in database
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
backend/test/backend_tests/rpc_file_branch_test.clj
View File

@ -968,12 +968,17 @@
(t/is (true? (-> out :result :changed))))
(let [row (th/db-get :file {:id branch-file-id})]
(t/is (false? (:is-branch row)))
(t/is (some? (:data row))))
(t/is (false? (:is-branch row))))
;; the payload lands where the ordinary write path puts it, which
;; is a `file_data` row rather than the legacy `file.data` column
(t/is (some? (th/db-get :file-data {:file-id branch-file-id :type "data"})))
(t/is (empty? (th/db-query :file-branch-change {:branch-id branch-id})))
(let [row (th/db-get :file-branch {:id branch-id})]
;; the branch row is archived AND logically deleted, so it has to
;; be read with the deleted-row filter off
(let [row (th/db-get :file-branch {:id branch-id} {:app.db/remove-deleted false})]
(t/is (= "archived" (:status row)))
(t/is (some? (:deleted-at row)))))