From f1c18e17663353d4a46f6dc23da72f49c53549cb Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Thu, 3 Mar 2022 22:44:25 +0100 Subject: [PATCH] download: Fix typo in procedure name. * guix/build/download.scm (make-credendials-with-ca-trust-files): Rename to... (make-credentials-with-ca-trust-files): ... this. --- guix/build/download.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/guix/build/download.scm b/guix/build/download.scm index 911f551b57..41583e8143 100644 --- a/guix/build/download.scm +++ b/guix/build/download.scm @@ -178,7 +178,7 @@ name decoding bug described at (let ((data (call-with-input-file file get-bytevector-all))) (set-certificate-credentials-x509-trust-data! cred data format))) -(define make-credendials-with-ca-trust-files +(define make-credentials-with-ca-trust-files (mlambda (directory) "Return certificate credentials with X.509 authority certificates read from DIRECTORY. Those authority certificates are checked when @@ -277,7 +277,7 @@ host name without trailing dot." (set-session-credentials! session (if (and verify-certificate? ca-certs) - (make-credendials-with-ca-trust-files + (make-credentials-with-ca-trust-files ca-certs) (make-certificate-credentials)))