Revision 262a08a2 Ganeti/HTools/CLI.hs

b/Ganeti/HTools/CLI.hs
28 28 
import qualified Ganeti.HTools.Rapi as Rapi
29 29 
import qualified Ganeti.HTools.Text as Text
30 30 
import qualified Ganeti.HTools.Loader as Loader
31 
import qualified Ganeti.HTools.Instance as Instance
32 
import qualified Ganeti.HTools.Node as Node
31 33 

  		





  32
  34
  
    
import Ganeti.HTools.Types


  		





  33
  35
  
    

  		





  ......




  98
  100
  
    
-- | External tool data loader from a variety of sources


  		





  99
  101
  
    
loadExternalData :: (EToolOptions a) =>


  		





  100
  102
  
    
                    a


  		





  101
  
  
    
                 -> IO (NodeList, InstanceList, String)


  		





  
  103
  
    
                 -> IO (Node.List, Instance.List, String)


  		





  102
  104
  
    
loadExternalData opts = do


  		





  103
  105
  
    
  (env_node, env_inst) <- parseEnv ()


  		





  104
  106
  
    
  let nodef = if nodeSet opts then nodeFile opts


  		












Also available in:
  Unified diff