amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

git-authenticate: 'authenticate-commits' takes a #:keyring parameter.

Browse source 
* guix/git-authenticate.scm (authenticate-commits): Add #:keyring
parameter.
This commit is contained in:
Ludovic Courtès 2020-06-08 11:52:15 +02:00
parent a450b4343b
commit 41946b79f1
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
guix/git-authenticate.scm
View file

@ -271,13 +271,13 @@ an OpenPGP keyring."
#:key #:key
(default-authorizations '()) (default-authorizations '())
(keyring-reference "keyring") (keyring-reference "keyring")
(keyring (load-keyring-from-reference
repository keyring-reference))
(report-progress (const #t))) (report-progress (const #t)))
"Authenticate COMMITS, a list of commit objects, calling REPORT-PROGRESS for "Authenticate COMMITS, a list of commit objects, calling REPORT-PROGRESS for
each of them. Return an alist showing the number of occurrences of each key. each of them. Return an alist showing the number of occurrences of each key.
The OpenPGP keyring is loaded from KEYRING-REFERENCE in REPOSITORY." If KEYRING is omitted, the OpenPGP keyring is loaded from KEYRING-REFERENCE in
(define keyring REPOSITORY."
(load-keyring-from-reference repository keyring-reference))
(fold (lambda (commit stats) (fold (lambda (commit stats)
(report-progress) (report-progress)
(let ((signer (authenticate-commit repository commit keyring (let ((signer (authenticate-commit repository commit keyring