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]))
|
||||
|
||||
(defn root-storage-by-volume-size
|
||||
[in]
|
||||
(defn-spec root-storage-by-volume-size int?
|
||||
[volume-total-storage-size ::volume-total-storage-size]
|
||||
(cond
|
||||
(<= in 5) (throw (Exception. "Volume smaller or equal 5Gi!\nIncrease volume-total-storage-size to value > 5"))
|
||||
(and (> in 5) (<= in 20)) 5
|
||||
(and (> in 20) (<= in 100)) 10
|
||||
(> in 100) 20))
|
||||
(and (> volume-total-storage-size 5) (<= volume-total-storage-size 20)) 5
|
||||
(and (> volume-total-storage-size 20) (<= volume-total-storage-size 100)) 10
|
||||
(> volume-total-storage-size 100) 20))
|
||||
|
||||
(defn data-storage-by-volume-size
|
||||
[total root]
|
||||
|
|
Loading…
Reference in a new issue