Revision 71375ef7 htools/Ganeti/HTools/Rapi.hs

b/htools/Ganeti/HTools/Rapi.hs
183 183 
  inst_data <- inst_body >>= getInstances node_names
184 184 
  let (_, inst_idx) = assignIndices inst_data
185 185 
  tags_data <- tags_body >>= (fromJResult "Parsing tags data" . decodeStrict)
186 
  return (ClusterData group_idx node_idx inst_idx tags_data)
186 
  return (ClusterData group_idx node_idx inst_idx tags_data defIPolicy)
187 187 

  		





  188
  188
  
    
-- | Top level function for data loading.


  		





  189
  189
  
    
loadData :: String -- ^ Cluster or URL to use as source


  		












Also available in:
  Unified diff