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}
|
[: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))
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
|
|
|
@ -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 _ _]
|
||||||
|
|
Loading…
Add table
Reference in a new issue