From 33717eebaa702e7c175ca95aa839e36f06194807 Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Thu, 18 Jun 2015 08:41:08 -0400 Subject: [PATCH] Fixing empty request data --- racket/collects/net/http-client.rkt | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/racket/collects/net/http-client.rkt b/racket/collects/net/http-client.rkt index 5bbc4ca5aa..6e254c44eb 100644 --- a/racket/collects/net/http-client.rkt +++ b/racket/collects/net/http-client.rkt @@ -25,9 +25,13 @@ bs)) (define (->bytes str) - (if (string? str) - (string->bytes/utf-8 str) - str)) + (cond + [(string? str) + (string->bytes/utf-8 str)] + [(not str) + #""] + [else + str])) (define (read-bytes-line/not-eof ip kind) (define bs (read-bytes-line ip kind))