We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
2 parents bf6d832 + c59480e commit c25238eCopy full SHA for c25238e
src/malli/core.cljc
@@ -652,8 +652,9 @@
652
(fn [{:keys [min max]}]
653
(cond
654
(not (or min max)) nil
655
- (and (and min max) f) (fn [x] (let [size (f x)] (<= min size max)))
656
- (and min max) (fn [x] (<= min x max))
+ (and (and min max) f) (fn [x] (let [size (f x)]
+ (and (<= min size) (<= size max))))
657
+ (and min max) (fn [x] (and (<= min x) (<= x max)))
658
(and min f) (fn [x] (<= min (f x)))
659
min (fn [x] (<= min x))
660
(and max f) (fn [x] (<= (f x) max))
0 commit comments