diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/run.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/run.scm b/tests/run.scm index 347c18f..fbc3e6c 100644 --- a/tests/run.scm +++ b/tests/run.scm @@ -182,7 +182,7 @@ 'multipart/form-data (header-value 'content-type h)) (test "Content-length was set" - 504 (header-value 'content-length h)) + (string-length expected-data) (header-value 'content-length h)) (test "Version is the default HTTP version of 1.1" '(1 . 1) (cons (request-major req) (request-minor req))) @@ -230,7 +230,7 @@ 'multipart/form-data (header-value 'content-type h)) (test "Content-length was set" - 504 (header-value 'content-length h)) + (string-length expected-data) (header-value 'content-length h)) (test "Version is correct" '(1 . 0) (cons (request-major req) (request-minor req))) |