summaryrefslogtreecommitdiff
path: root/test-suite/tests/web-request.test
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/tests/web-request.test')
-rw-r--r--test-suite/tests/web-request.test7
1 files changed, 2 insertions, 5 deletions
diff --git a/test-suite/tests/web-request.test b/test-suite/tests/web-request.test
index 32b99dd99..e1eec2f74 100644
--- a/test-suite/tests/web-request.test
+++ b/test-suite/tests/web-request.test
@@ -51,11 +51,8 @@ Accept-Language: en-gb, en;q=0.9\r
(pass-if (equal? (request-uri r) (build-uri 'http #:path "/qux")))
- (pass-if (equal? (read-request-body/latin-1 r) #f))
- ;; Since it's #f, should be an idempotent read, so we can try
- ;; bytevectors too
- (pass-if (equal? (read-request-body/bytevector r) #f))
-
+ (pass-if (equal? (read-request-body r) #f))
+
(pass-if "checking all headers"
(equal?
(request-headers r)