Revision f5a67757

b/src/Ganeti/Config.hs
33 33
    , getDefaultNicLink
34 34
    , getDefaultHypervisor
35 35
    , getInstancesIpByLink
36
    , getMasterCandidates
36 37
    , getNode
37 38
    , getInstance
38 39
    , getGroup
......
129 130
  | nodeOffline node = NROffline
130 131
  | otherwise = NRRegular
131 132

  
133
-- | Get the list of master candidates.
134
getMasterCandidates :: ConfigData -> [Node]
135
getMasterCandidates cfg = 
136
  filter ((==) NRCandidate . getNodeRole cfg)
137
    (map snd . M.toList . fromContainer . configNodes $ cfg)
138

  
132 139
-- | Returns the default cluster link.
133 140
getDefaultNicLink :: ConfigData -> String
134 141
getDefaultNicLink =

Also available in: Unified diff