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:
parent
1c75e5b46b
commit
9b3964e6d7
2 changed files with 3 additions and 3 deletions
|
@ -58,10 +58,10 @@
|
|||
[:media {:optional true}
|
||||
[:map-of {:gen/max 5} ::sm/uuid ::media-object]]])
|
||||
|
||||
(def file-data?
|
||||
(def valid-file-data?
|
||||
(sm/pred-fn ::data))
|
||||
|
||||
(def media-object?
|
||||
(def valid-media-object?
|
||||
(sm/pred-fn ::media-object))
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
|
|
@ -182,7 +182,7 @@
|
|||
|
||||
(defn add-media
|
||||
[media]
|
||||
(dm/assert! (ctf/media-object? media))
|
||||
(dm/assert! (ctf/valid-media-object? media))
|
||||
(ptk/reify ::add-media
|
||||
ptk/WatchEvent
|
||||
(watch [it _ _]
|
||||
|
|
Loading…
Add table
Reference in a new issue