Haskell卷曲状态401上缺少内容

Question

最新版本1.3.7中的curl haskell库存在一些问题。

Haskell中的一些例子：

module CurlTest where

import Network.Curl

url = "http://www.example.com/private/"
opts = [CurlFollowLocation True]

main = withCurlDo $ do
    curlGet url opts
    return ()

我使用ghci运行此代码段并且我没有得到任何输出。在状态码为200的公共站点上，我获得了页面内容。使用命令行中的纯curl，我可以按照预期在401个站点上获取页面内容。

我是否错过了haskell curl的选项 - 电话，还是错误？如果它是一个bug，是否有解决方法或一些curl - haskell的替代品？

问候