-

private/self-signed-cert.rkt

@@ -317,8 +317,14 @@
         (EVP_PKEY_free pkey)
         (X509_free x509)
 
-        (make-self-signed-cert (bytes->string/utf-8 pkey-data)
+        ;(displayln pkey-data)
-                               (bytes->string/utf-8 x509-data))
+        ;(displayln x509-data)
+        ;(displayln (format "pkey: ~a" (bytes->string/utf-8 pkey-data)))
+        ;(displayln (format "cert: ~a" (bytes->string/utf-8 x509-data)))
+
+        (make-self-signed-cert pkey-data x509-data)
+        ;(bytes->string/utf-8 pkey-data)
+        ;                       (bytes->string/utf-8 x509-data))
         )
       )
     )