Revision da5f09ef src/Ganeti/HTools/Program/Hspace.hs
b/src/Ganeti/HTools/Program/Hspace.hs | ||
---|---|---|
443 | 443 |
|
444 | 444 |
-- Run the tiered allocation |
445 | 445 |
|
446 |
let tspec = fromMaybe (rspecFromISpec (iPolicyMaxSpec ipol)) |
|
446 |
let minmax = iPolicyMinMaxISpecs ipol |
|
447 |
let tspec = fromMaybe (rspecFromISpec (minMaxISpecsMaxSpec minmax)) |
|
447 | 448 |
(optTieredSpec opts) |
448 | 449 |
|
449 | 450 |
(treason, trl_nl, _, spec_map) <- |
Also available in: Unified diff