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

✨ Make schema uuid parsing fns private

Browse source
This commit is contained in:
Andrey Antukh 2025-04-16 09:51:55 +02:00
parent a209966427
commit e69c0c3e27
1 changed files with 8 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
common/src/app/common/schema.cljc
View file

@ -390,17 +390,16 @@
(register! :merge (mu/-merge)) (register! :merge (mu/-merge))
(register! :union (mu/-union)) (register! :union (mu/-union))
(def uuid-rx (defn- parse-uuid
#"^[0-9a-f]{8}-[0-9a-f]{4}-[0-9a-f]{4}-[0-9a-f]{4}-[0-9a-f]{12}$")
(defn parse-uuid
[s] [s]
(try (if (str/empty? s)
(uuid/parse s) nil
(catch #?(:clj Exception :cljs :default) _cause (try
s))) (uuid/parse s)
(catch #?(:clj Exception :cljs :default) _cause
s))))
(defn encode-uuid (defn- encode-uuid
[v] [v]
(when (uuid? v) (when (uuid? v)
(str v))) (str v)))