Revision 1fe412bb htools/Ganeti/HTools/Types.hs

b/htools/Ganeti/HTools/Types.hs
59 59 
    , OpResult(..)
60 60 
    , connTimeout
61 61 
    , queryTimeout
62 
    , EvacMode(..)
62 63 
    ) where
63 64 

  		





  64
  65
  
    
import qualified Data.Map as M


  		





  ......




  279
  280
  
    
              name = nameOf e


  		





  280
  281
  
    
    -- | Updates the index of the element


  		





  281
  282
  
    
    setIdx  :: a -> Int -> a


  		





  
  283
  
    

  		





  
  284
  
    
-- | The iallocator node-evacuate evac_mode type.


  		





  
  285
  
    
data EvacMode = ChangePrimary


  		





  
  286
  
    
              | ChangeSecondary


  		





  
  287
  
    
              | ChangeAll


  		





  
  288
  
    
                deriving (Show, Read)


  		












Also available in:
  Unified diff