Revision 9b9a5931

b/src/Rapi.hs
103 103 
tryRapi url1 url2 =
104 104 
    do
105 105 
      body1 <- getUrl url1
106 
      body2 <- getUrl url2
107 
      return (case body1 of
108 
                Left _ -> body2
109 
                Right _ -> body1)
106 
      (case body1 of
107 
         Left _ -> getUrl url2
108 
         Right _ -> return body1)
110 109 

  		





  111
  110
  
    
getInstances :: String -> IO (Either String String)


  		





  112
  111
  
    
getInstances master =


  		












Also available in:
  Unified diff