C:\Users\jenkins\AppData\Local\Temp\stack4956\http-client-0.5.7.0\Network\HTTP\Proxy.hs:177:43: error:
* Couldn't match type `Maybe [Char]' with `[Char]'
Expected type: String
Actual type: Maybe [Char]
* In the second argument of `regQueryValue', namely
`(Just "ProxyServer")'
In a stmt of a 'do' block:
server <- regQueryValue hkey (Just "ProxyServer")
In the expression:
do { server <- regQueryValue hkey (Just "ProxyServer");
exceptions <- try $ regQueryValue hkey (Just "ProxyOverride") ::
IO (Either IOException String);
return $ Just (server, either (const "") id exceptions) }