Revision 71375ef7 htools/Ganeti/HTools/Program/Hbal.hs
| b/htools/Ganeti/HTools/Program/Hbal.hs | ||
|---|---|---|
| 351 | 351 |
shownodes = optShowNodes opts |
| 352 | 352 |
showinsts = optShowInsts opts |
| 353 | 353 |
|
| 354 |
ini_cdata@(ClusterData gl fixed_nl ilf ctags) <- loadExternalData opts |
|
| 354 |
ini_cdata@(ClusterData gl fixed_nl ilf ctags _) <- loadExternalData opts
|
|
| 355 | 355 |
|
| 356 | 356 |
when (verbose > 1) $ |
| 357 | 357 |
putStrLn $ "Loaded cluster tags: " ++ intercalate "," ctags |
| ... | ... | |
| 412 | 412 |
saveBalanceCommands opts $ Cluster.formatCmds cmd_jobs |
| 413 | 413 |
|
| 414 | 414 |
maybeSaveData (optSaveCluster opts) "balanced" "after balancing" |
| 415 |
(ClusterData gl fin_nl fin_il ctags)
|
|
| 415 |
ini_cdata { cdNodes = fin_nl, cdInstances = fin_il }
|
|
| 416 | 416 |
|
| 417 | 417 |
maybePrintInsts showinsts "Final" (Cluster.printInsts fin_nl fin_il) |
| 418 | 418 |
|
Also available in: Unified diff