Revision bfa99f7a src/Ganeti/HTools/Program/Hbal.hs
| b/src/Ganeti/HTools/Program/Hbal.hs | ||
|---|---|---|
| 319 | 319 |
putStrLn $ "Selected node group: " ++ gname |
| 320 | 320 |
|
| 321 | 321 |
let (bad_nodes, bad_instances) = Cluster.computeBadItems nl il |
| 322 |
unless (verbose == 0) $ printf
|
|
| 322 |
unless (verbose < 1) $ printf
|
|
| 323 | 323 |
"Initial check done: %d bad nodes, %d bad instances.\n" |
| 324 | 324 |
(length bad_nodes) (length bad_instances) |
| 325 | 325 |
|
| ... | ... | |
| 399 | 399 |
|
| 400 | 400 |
putStr sol_msg |
| 401 | 401 |
|
| 402 |
unless (verbose == 0) $
|
|
| 402 |
unless (verbose < 1) $
|
|
| 403 | 403 |
printf "Solution length=%d\n" (length ord_plc) |
| 404 | 404 |
|
| 405 | 405 |
let cmd_jobs = Cluster.splitJobs cmd_strs |
Also available in: Unified diff