Revision 30ce253e src/Ganeti/HTools/CLI.hs

b/src/Ganeti/HTools/CLI.hs
77 77 
  , oOutputDir
78 78 
  , oPrintCommands
79 79 
  , oPrintInsts
80 
  , oPrintMoves
80 81 
  , oPrintNodes
81 82 
  , oQuiet
82 83 
  , oRapiMaster
......
146 147 
  , optOfflineMaintenance :: Bool    -- ^ Pretend all instances are offline
147 148 
  , optOneStepOnly :: Bool           -- ^ Only do the first step
148 149 
  , optOutPath     :: FilePath       -- ^ Path to the output directory
150 
  , optPrintMoves  :: Bool           -- ^ Whether to show the instance moves
149 151 
  , optSaveCluster :: Maybe FilePath -- ^ Save cluster state to this file
150 152 
  , optShowCmds    :: Maybe FilePath -- ^ Whether to show the command list
151 153 
  , optShowHelp    :: Bool           -- ^ Just show the help
......
199 201 
  , optOfflineMaintenance = False
200 202 
  , optOneStepOnly = False
201 203 
  , optOutPath     = "."
204 
  , optPrintMoves  = False
202 205 
  , optSaveCluster = Nothing
203 206 
  , optShowCmds    = Nothing
204 207 
  , optShowHelp    = False
......
535 538 
   "print the final instance map",
536 539 
   OptComplNone)
537 540 

  		





  
  541
  
    
oPrintMoves :: OptType


  		





  
  542
  
    
oPrintMoves =


  		





  
  543
  
    
  (Option "" ["print-moves"]


  		





  
  544
  
    
   (NoArg (\ opts -> Ok opts { optPrintMoves = True }))


  		





  
  545
  
    
   "print the moves of the instances",


  		





  
  546
  
    
   OptComplNone)


  		





  
  547
  
    

  		





  538
  548
  
    
oPrintNodes :: OptType


  		





  539
  549
  
    
oPrintNodes =


  		





  540
  550
  
    
  (Option "p" ["print-nodes"]


  		












Also available in:
  Unified diff