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