Revision 1b0a6356 htools/Ganeti/HTools/Loader.hs

b/htools/Ganeti/HTools/Loader.hs
288 288 
      il4 = Container.map (filterExTags allextags .
289 289 
                           updateMovable selinst_names exinst_names) il3
290 290 
      nl2 = foldl' fixNodes nl (Container.elems il4)
291 
      nl3 = Container.map (flip Node.buildPeers il4) nl2
291 
      nl3 = Container.map (`Node.buildPeers` il4) nl2
292 292 
      node_names = map Node.name (Container.elems nl)
293 293 
      common_suffix = longestDomain (node_names ++ inst_names)
294 294 
      snl = Container.map (computeAlias common_suffix) nl3

Also available in: Unified diff