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.
This commit is contained in:
Ludovic Courtès 2022-03-03 22:44:25 +01:00
parent c1a871a166
commit f1c18e1766
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5

@ -178,7 +178,7 @@ name decoding bug described at
(let ((data (call-with-input-file file get-bytevector-all))) (let ((data (call-with-input-file file get-bytevector-all)))
(set-certificate-credentials-x509-trust-data! cred data format))) (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) (mlambda (directory)
"Return certificate credentials with X.509 authority certificates read from "Return certificate credentials with X.509 authority certificates read from
DIRECTORY. Those authority certificates are checked when DIRECTORY. Those authority certificates are checked when
@ -277,7 +277,7 @@ host name without trailing dot."
(set-session-credentials! session (set-session-credentials! session
(if (and verify-certificate? ca-certs) (if (and verify-certificate? ca-certs)
(make-credendials-with-ca-trust-files (make-credentials-with-ca-trust-files
ca-certs) ca-certs)
(make-certificate-credentials))) (make-certificate-credentials)))