Revision e3a684c5 Ganeti/HTools/IAlloc.hs

b/Ganeti/HTools/IAlloc.hs
101 101 
              ridx <- lookupNode kti rname rname
102 102 
              return $ Relocate ridx
103 103 
        other -> fail $ ("Invalid request type '" ++ other ++ "'")
104 
  (map_n, map_i, csf) <- mergeData (ktn, nl, kti, il)
104 
  (map_n, map_i, csf) <- mergeData (nl, il)
105 105 
  return $ Request rqtype map_n map_i csf
106 106 

  		





  107
  107
  
    
formatResponse :: Bool -> String -> [String] -> String


  		












Also available in:
  Unified diff