diff --git a/collects/net/url.rkt b/collects/net/url.rkt
index 0a9e41adb3..13a8f92240 100644
--- a/collects/net/url.rkt
+++ b/collects/net/url.rkt
@@ -209,7 +209,7 @@
 (define (get-pure-port/headers url [strings '()] #:redirections [redirections 0])
   (let redirection-loop ([redirections redirections] [url url])
     (define ip
-      (http://getpost-impure-port #t url #f '()))
+      (http://getpost-impure-port #t url #f strings))
     (define status (read-line ip 'return-linefeed))
     (define-values (new-url chunked? headers)
       (let loop ([new-url #f] [chunked? #f] [headers '()])