Revision 66ad857a htools/Ganeti/HTools/Program/Hcheck.hs

b/htools/Ganeti/HTools/Program/Hcheck.hs
312 312 
      clusterstats = map sum . transpose . map snd $ groupsstats
313 313 
      needrebalance = clusterNeedsRebalance clusterstats
314 314 

  		





  315
  
  
    
  unless (verbose == 0 || machineread) $


  		





  316
  
  
    
    if nosimulation


  		





  317
  
  
    
      then putStrLn "Running in no-simulation mode."


  		





  318
  
  
    
      else if needrebalance


  		





  319
  
  
    
             then putStrLn "Cluster needs rebalancing."


  		





  320
  
  
    
             else putStrLn "No need to rebalance cluster, no problems found."


  		





  
  315
  
    
  unless (verbose == 0 || machineread) .


  		





  
  316
  
    
    putStrLn $ if nosimulation


  		





  
  317
  
    
                 then "Running in no-simulation mode."


  		





  
  318
  
    
                 else if needrebalance


  		





  
  319
  
    
                        then "Cluster needs rebalancing."


  		





  
  320
  
    
                        else "No need to rebalance cluster, no problems found."


  		





  321
  321
  
    

  		





  322
  322
  
    
  mapM_ (printGroupStats verbose machineread Initial) groupsstats


  		





  323
  323
  
    

  		












Also available in:
  Unified diff