Revision 410a8a76 htools/Ganeti/HTools/Program/Hspace.hs

b/htools/Ganeti/HTools/Program/Hspace.hs
392 392 
         exitWith $ ExitFailure 1
393 393 

  		





  394
  394
  
    
  let verbose = optVerbose opts


  		





  395
  
  
    
      ispec = optISpec opts


  		





  
  395
  
    
      ispec = optStdSpec opts


  		





  396
  396
  
    
      disk_template = optDiskTemplate opts


  		





  397
  397
  
    
      req_nodes = Instance.requiredNodes disk_template


  		





  398
  398
  
    
      machine_r = optMachineReadable opts


  		












Also available in:
  Unified diff