summaryrefslogtreecommitdiffhomepage
path: root/Gpg/Wot.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Gpg/Wot.hs')
-rw-r--r--Gpg/Wot.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Gpg/Wot.hs b/Gpg/Wot.hs
index a5d0450..f9051e9 100644
--- a/Gpg/Wot.hs
+++ b/Gpg/Wot.hs
@@ -62,7 +62,7 @@ wotServer = "https://pgp.cs.uu.nl/"
downloadWotStats :: GpgKeyId -> IO (Maybe WotStats)
downloadWotStats (GpgKeyId k) = do
- manager <- newTlsManager
+ manager <- getGlobalManager
request <- parseRequest url
response <- httpLbs request manager
return $ decode (responseBody response)
@@ -71,7 +71,7 @@ downloadWotStats (GpgKeyId k) = do
downloadWotPath :: GpgKeyId -> GpgKeyId -> IO (Maybe WotPath)
downloadWotPath (GpgKeyId fromid) (GpgKeyId toid) = do
- manager <- newTlsManager
+ manager <- getGlobalManager
request <- parseRequest url
response <- httpLbs request manager
return $ decode (responseBody response)