summaryrefslogtreecommitdiffstats
path: root/Regfish.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Regfish.hs')
-rw-r--r--Regfish.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Regfish.hs b/Regfish.hs
index a0c70db..7a1a5f0 100644
--- a/Regfish.hs
+++ b/Regfish.hs
@@ -132,7 +132,7 @@ regfishGet url =
Just _ -> do
--putStrLn $ "GET " <> url
- let opts = W.defaults & W.cookies .~ cj
+ let opts = W.defaults & W.cookies .~ Just cj
res <- liftIO $ W.getWith opts url
@@ -166,7 +166,7 @@ regfishPost url params = do
Just _ -> do
--putStrLn $ "POST " <> url <> " " <> show params
- let opts = W.defaults & W.cookies .~ cj
+ let opts = W.defaults & W.cookies .~ Just cj
res <- liftIO $ W.postWith opts url params