diff --git a/pkgs/net-pkgs/net-test/tests/net/http-client.rkt b/pkgs/net-pkgs/net-test/tests/net/http-client.rkt
index dbda01123e..d416dc06ca 100644
--- a/pkgs/net-pkgs/net-test/tests/net/http-client.rkt
+++ b/pkgs/net-pkgs/net-test/tests/net/http-client.rkt
@@ -88,6 +88,22 @@
                                          #:headers empty
                                          #:data #f)
                        raw ereq estatus eheaders econtent))
+           #,(syntax/loc stx
+               (test-e the-port
+                       (let ([c (hc:http-conn-open "localhost"
+                                                   #:port the-port
+                                                   #:ssl? #f)])
+                         (check-equal? #t (hc:http-conn-live? c))
+                         (hc:http-conn-send! c
+                                             "/"
+                                             #:method "GET"
+                                             #:headers empty
+                                             #:data #f)
+                         (begin0
+                          (hc:http-conn-recv! c
+                                              #:close? #t)
+                          (check-equal? #f (hc:http-conn-live? c))))
+                       raw ereq estatus eheaders econtent))
            #,(syntax/loc stx
                (test-e the-port
                        (u:http-sendrecv/url