From 2eb6b7fa678ddd6a6d84dc69e6e71a023403499f Mon Sep 17 00:00:00 2001 From: Hans Dijkema Date: Tue, 10 Mar 2026 17:24:53 +0100 Subject: [PATCH] - --- private/self-signed-cert.rkt | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/private/self-signed-cert.rkt b/private/self-signed-cert.rkt index 70ca1d8..11cf06e 100644 --- a/private/self-signed-cert.rkt +++ b/private/self-signed-cert.rkt @@ -169,6 +169,7 @@ (RSA_generate_key (_fun _int _int _gen_rsa_cb _pointer -> _RSA-pointer)) (EVP_PKEY_assign (_fun _EVP_PKEY-pointer _int _RSA-pointer -> _int)) (EVP_sha1 (_fun -> _EVP_MD-pointer)) + (EVP_sha256 (_fun -> _EVP_MD-pointer)) (X509_new (_fun -> _X509-pointer)) (X509_free (_fun _X509-pointer -> _void)) @@ -282,7 +283,7 @@ ) ) - (when (= (X509_sign x509 pkey (EVP_sha1)) 0) + (when (= (X509_sign x509 pkey (EVP_sha256)) 0) (X509_free x509) (error "Error signing certificate"))