diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2020-06-08 11:52:15 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2020-06-16 16:10:46 +0200 |
| commit | 41946b79f10d9b18e66c81f4eb35e1fde132c3ef (patch) | |
| tree | 393598a7bd7139dc1edf6f51e612ce757a0fece9 /guix/git-authenticate.scm | |
| parent | a450b4343bc1e5284c4db6409976eba7bb92df19 (diff) | |
| download | guix-patches-41946b79f10d9b18e66c81f4eb35e1fde132c3ef.tar guix-patches-41946b79f10d9b18e66c81f4eb35e1fde132c3ef.tar.gz | |
git-authenticate: 'authenticate-commits' takes a #:keyring parameter.
* guix/git-authenticate.scm (authenticate-commits): Add #:keyring
parameter.
Diffstat (limited to 'guix/git-authenticate.scm')
| -rw-r--r-- | guix/git-authenticate.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/guix/git-authenticate.scm b/guix/git-authenticate.scm index cdb54a01a7..228d551d11 100644 --- a/guix/git-authenticate.scm +++ b/guix/git-authenticate.scm @@ -271,13 +271,13 @@ an OpenPGP keyring." #:key (default-authorizations '()) (keyring-reference "keyring") + (keyring (load-keyring-from-reference + repository keyring-reference)) (report-progress (const #t))) "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. -The OpenPGP keyring is loaded from KEYRING-REFERENCE in REPOSITORY." - (define keyring - (load-keyring-from-reference repository keyring-reference)) - +If KEYRING is omitted, the OpenPGP keyring is loaded from KEYRING-REFERENCE in +REPOSITORY." (fold (lambda (commit stats) (report-progress) (let ((signer (authenticate-commit repository commit keyring |