Revision d067f40b src/Ganeti/HsConstants.hs

b/src/Ganeti/HsConstants.hs
1100 1100
-- * Node evacuation
1101 1101

  
1102 1102
nodeEvacPri :: String
1103
nodeEvacPri = Types.nodeEvacModeToRaw NEvacPrimary
1103
nodeEvacPri = Types.evacModeToRaw ChangePrimary
1104 1104

  
1105 1105
nodeEvacSec :: String
1106
nodeEvacSec = Types.nodeEvacModeToRaw NEvacSecondary
1106
nodeEvacSec = Types.evacModeToRaw ChangeSecondary
1107 1107

  
1108 1108
nodeEvacAll :: String
1109
nodeEvacAll = Types.nodeEvacModeToRaw NEvacAll
1109
nodeEvacAll = Types.evacModeToRaw ChangeAll
1110 1110

  
1111 1111
nodeEvacModes :: FrozenSet String
1112
nodeEvacModes = ConstantUtils.mkSet $ map Types.nodeEvacModeToRaw [minBound..]
1112
nodeEvacModes = ConstantUtils.mkSet $ map Types.evacModeToRaw [minBound..]
1113 1113

  
1114 1114
-- * Job status
1115 1115

  

Also available in: Unified diff