aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Web/ZeroBin.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Web/ZeroBin.hs b/src/Web/ZeroBin.hs
index 0f32a50..de32ce3 100644
--- a/src/Web/ZeroBin.hs
+++ b/src/Web/ZeroBin.hs
@@ -67,7 +67,7 @@ form Never = "never"
post :: String -> Expiration -> Content -> IO String
post bin ex ct = do
- req' <- HTTP.parseUrl $ bin ++ "/paste/create"
+ req' <- HTTP.parseRequest $ bin ++ "/paste/create"
let req =
HTTP.urlEncodedBody
[ (C.pack "expiration", C.pack $ form ex)