Revision 2207220d src/Ganeti/HTools/CLI.hs
b/src/Ganeti/HTools/CLI.hs | ||
---|---|---|
71 | 71 |
, oNodeSim |
72 | 72 |
, oNodeTags |
73 | 73 |
, oOfflineNode |
74 |
, oOneStepOnly |
|
74 | 75 |
, oOutputDir |
75 | 76 |
, oPrintCommands |
76 | 77 |
, oPrintInsts |
... | ... | |
138 | 139 |
, optNodeSim :: [String] -- ^ Cluster simulation mode |
139 | 140 |
, optNodeTags :: Maybe [String] -- ^ List of node tags to restrict to |
140 | 141 |
, optOffline :: [String] -- ^ Names of offline nodes |
142 |
, optOneStepOnly :: Bool -- ^ Only do the first step |
|
141 | 143 |
, optOutPath :: FilePath -- ^ Path to the output directory |
142 | 144 |
, optSaveCluster :: Maybe FilePath -- ^ Save cluster state to this file |
143 | 145 |
, optShowCmds :: Maybe FilePath -- ^ Whether to show the command list |
... | ... | |
186 | 188 |
, optNodeSim = [] |
187 | 189 |
, optNodeTags = Nothing |
188 | 190 |
, optOffline = [] |
191 |
, optOneStepOnly = False |
|
189 | 192 |
, optOutPath = "." |
190 | 193 |
, optSaveCluster = Nothing |
191 | 194 |
, optShowCmds = Nothing |
... | ... | |
469 | 472 |
"set node as offline", |
470 | 473 |
OptComplOneNode) |
471 | 474 |
|
475 |
oOneStepOnly :: OptType |
|
476 |
oOneStepOnly = |
|
477 |
(Option "" ["one-step-only"] |
|
478 |
(NoArg (\ opts -> Ok opts {optOneStepOnly = True})) |
|
479 |
"Only do the first step", |
|
480 |
OptComplNone) |
|
481 |
|
|
472 | 482 |
oOutputDir :: OptType |
473 | 483 |
oOutputDir = |
474 | 484 |
(Option "d" ["output-dir"] |
Also available in: Unified diff