1 files changed, 1 insertions, 1 deletions

diff --git a/src/Network/BitTorrent/Tracker/HTTP.hs b/src/Network/BitTorrent/Tracker/HTTP.hs
index 2d49436d..b466b49e 100644
--- a/src/Network/BitTorrent/Tracker/HTTP.hs
+++ b/src/Network/BitTorrent/Tracker/HTTP.hs
@@ -69,7 +69,7 @@ mkGET uri = Request uri GET [] ""
 --
 announceHTTP :: HTTPTracker -> AnnounceQuery -> IO AnnounceInfo
 announceHTTP HTTPTracker {..} req = do
-    let r = mkGET (encodeRequest announceURI req)
+    let r = mkGET (renderAnnounceQuery announceURI req)
 
     rawResp  <- simpleHTTP r
     respBody <- getResponseBody rawResp