From 8d65a71e5fb21303df8628f89e84d2684738f145 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Thu, 7 May 2020 11:52:23 +0200 Subject: git-authenticate: Use the 'origin/keyring' branch by default. Previously one would need to have a worktree for the local 'keyring' branch. Reported by reepca and bricewge on #guix. * build-aux/git-authenticate.scm (load-keyring-from-reference): Use 'branch-lookup' instead of 'reference-lookup'. Add "origin/" to REFERENCE. (authenticate-commits): Have #:keyring-reference default to "keyring". --- build-aux/git-authenticate.scm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/build-aux/git-authenticate.scm b/build-aux/git-authenticate.scm index 7bb3af6ecb..ab50459369 100644 --- a/build-aux/git-authenticate.scm +++ b/build-aux/git-authenticate.scm @@ -337,7 +337,9 @@ may not be ASCII-armored." (define (load-keyring-from-reference repository reference) "Load the '.key' files from the tree at REFERENCE in REPOSITORY and return an OpenPGP keyring." - (let* ((reference (reference-lookup repository reference)) + (let* ((reference (branch-lookup repository + (string-append "origin/" reference) + BRANCH-REMOTE)) (target (reference-target reference)) (commit (commit-lookup repository target)) (tree (commit-tree commit))) @@ -353,7 +355,7 @@ an OpenPGP keyring." (define* (authenticate-commits repository commits #:key - (keyring-reference "refs/heads/keyring") + (keyring-reference "keyring") (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. -- cgit v1.2.3