Remove Exception.
This commit is contained in:
parent
0a40b5697f
commit
627d1e4d19
1 changed files with 5 additions and 6 deletions
|
@ -44,13 +44,12 @@
|
||||||
|
|
||||||
(def vol? (s/keys :req-un [::volume-total-storage-size]))
|
(def vol? (s/keys :req-un [::volume-total-storage-size]))
|
||||||
|
|
||||||
(defn root-storage-by-volume-size
|
(defn-spec root-storage-by-volume-size int?
|
||||||
[in]
|
[volume-total-storage-size ::volume-total-storage-size]
|
||||||
(cond
|
(cond
|
||||||
(<= in 5) (throw (Exception. "Volume smaller or equal 5Gi!\nIncrease volume-total-storage-size to value > 5"))
|
(and (> volume-total-storage-size 5) (<= volume-total-storage-size 20)) 5
|
||||||
(and (> in 5) (<= in 20)) 5
|
(and (> volume-total-storage-size 20) (<= volume-total-storage-size 100)) 10
|
||||||
(and (> in 20) (<= in 100)) 10
|
(> volume-total-storage-size 100) 20))
|
||||||
(> in 100) 20))
|
|
||||||
|
|
||||||
(defn data-storage-by-volume-size
|
(defn data-storage-by-volume-size
|
||||||
[total root]
|
[total root]
|
||||||
|
|
Loading…
Reference in a new issue