Revision 0991ed70 Ganeti/HTools/Cluster.hs
b/Ganeti/HTools/Cluster.hs | ||
---|---|---|
639 | 639 |
valid_idxes = map Node.idx valid_nodes |
640 | 640 |
sols1 = map (\x -> let (mnl, _, _, _) = |
641 | 641 |
applyMove nl inst (ReplaceSecondary x) |
642 |
in (mnl, [Container.find x nl])
|
|
642 |
in (mnl, [Container.find x nl]) |
|
643 | 643 |
) valid_idxes |
644 | 644 |
in return sols1 |
645 | 645 |
|
Also available in: Unified diff