Revision c0e31451 Ganeti/HTools/Loader.hs

b/Ganeti/HTools/Loader.hs
184 184 
          -> [String]             -- ^ Exclusion tags
185 185 
          -> [String]             -- ^ Untouchable instances
186 186 
          -> ClusterData          -- ^ Data from backends
187 
          -> Result ClusterData
187 
          -> Result ClusterData   -- ^ Fixed cluster data
188 188 
mergeData um extags exinsts cdata@(ClusterData _ nl il2 tags) =
189 189 
  let il = Container.elems il2
190 190 
      il3 = foldl' (\im (name, n_util) ->

Also available in: Unified diff