From 1c4570b3158e35c8d0134c684cfc07a308bc1300 Mon Sep 17 00:00:00 2001 From: Ryan Culpepper Date: Thu, 8 Apr 2021 19:35:03 +0200 Subject: [PATCH] fix commit 0a95c50f, missed one call to wrap-ports --- racket/collects/openssl/mzssl.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/racket/collects/openssl/mzssl.rkt b/racket/collects/openssl/mzssl.rkt index b2350bc032..d266f01bdd 100644 --- a/racket/collects/openssl/mzssl.rkt +++ b/racket/collects/openssl/mzssl.rkt @@ -1831,7 +1831,7 @@ TO DO: (close-input-port i) (close-output-port o) (raise exn))]) - (wrap-ports who i o (ssl-listener-mzctx ssl-listener) 'accept #t #f error/network #f)))) + (wrap-ports who i o (ssl-listener-mzctx ssl-listener) 'accept #t #f error/network #f null)))) (define (ssl-accept ssl-listener) (do-ssl-accept 'ssl-accept tcp-accept ssl-listener))