http-client sample program hangs
rahulmutt opened this issue · comments
Rahul Muttineni commented
The following program from http-client
docs hangs.
import Network.HTTP.Client
import Network.HTTP.Types.Status (statusCode)
main :: IO ()
main = do
manager <- newManager defaultManagerSettings
request <- parseRequest "http://eta-lang.org"
response <- httpLbs request manager
putStrLn $ "The status code was: " ++ (show $ statusCode $ responseStatus response)
print $ responseBody response
Rahul Muttineni commented
Fixed now.