Corrected self signed certificate

2026-04-12 12:42:31 +02:00
parent 06d53d1538
commit 6566b04606
3 changed files with 32 additions and 17 deletions
--- a/racket-webview.rkt
+++ b/racket-webview.rkt
@@ -458,9 +458,7 @@
                                          #:ou (wv-context-cert-ou-token h)))
         (server-cert (certificate cert))
         (channel (make-async-channel))
-         (server (let ((s (start-web-server h channel cert)))
-                   (sleep 3) ;;; ToDO Check if server is up
-                   s))
+         (server (start-web-server h channel cert))
         (port-nr (let ((pn (async-channel-get channel)))
                    (set-wv-context-port! h pn)
                    pn))