0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-22 14:39:45 -05:00

💄 Add naming improvements to some file type predicates

This commit is contained in:
Andrey Antukh 2023-11-11 00:10:57 +01:00
parent 1c75e5b46b
commit 9b3964e6d7
2 changed files with 3 additions and 3 deletions

View file

@ -58,10 +58,10 @@
[:media {:optional true} [:media {:optional true}
[:map-of {:gen/max 5} ::sm/uuid ::media-object]]]) [:map-of {:gen/max 5} ::sm/uuid ::media-object]]])
(def file-data? (def valid-file-data?
(sm/pred-fn ::data)) (sm/pred-fn ::data))
(def media-object? (def valid-media-object?
(sm/pred-fn ::media-object)) (sm/pred-fn ::media-object))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

View file

@ -182,7 +182,7 @@
(defn add-media (defn add-media
[media] [media]
(dm/assert! (ctf/media-object? media)) (dm/assert! (ctf/valid-media-object? media))
(ptk/reify ::add-media (ptk/reify ::add-media
ptk/WatchEvent ptk/WatchEvent
(watch [it _ _] (watch [it _ _]