Fix uuid regular experession.

This commit is contained in:
Andrey Antukh
2016-11-06 18:03:50 +01:00
parent 89779bf658
commit 3cba2cda12

View File

@@ -83,7 +83,7 @@
;; --- String utils
(def +uuid-re+
#"^[0-9a-f]{8}-[0-9a-f]{4}-[1-5][0-9a-f]{3}-[89ab][0-9a-f]{3}-[0-9a-f]{12}$")
#"^[0-9a-f]{8}-[0-9a-f]{4}-[0-9a-f]{4}-[0-9a-f]{4}-[0-9a-f]{12}$")
(defn uuid-str?
[v]