Revision dcd54d32
b/src/Ganeti/HTools/Program/Hsqueeze.hs | ||
---|---|---|
232 | 232 |
off_jobs = Cluster.splitJobs off_mvs |
233 | 233 |
off_cmd = |
234 | 234 |
Cluster.formatCmds off_jobs |
235 |
++ "\necho Tagging Commands\n" |
|
236 |
++ (toOffline >>= printf " gnt-node add-tags %s htools:standby:auto\n" . Node.alias) |
|
235 | 237 |
++ "\necho Power Commands\n" |
236 | 238 |
++ (toOffline >>= printf " gnt-node power -f off %s\n" . Node.alias) |
237 | 239 |
toOnline = tryOnline minInstance conf onlineCandidates |
Also available in: Unified diff