From 94f3831e5bb1e04eeb3a0e7d31a0675208ce6f4c Mon Sep 17 00:00:00 2001 From: Simon Tournier Date: Mon, 25 Sep 2023 12:00:18 +0200 Subject: [PATCH] git: Restore 'false-if-git-not-found' in 'reference-available?'. * guix/git/scm (reference-available?): Add 'false-if-git-not-found' for the case 'commit. --- guix/git.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/guix/git.scm b/guix/git.scm index 1b3355109e..b7182305cf 100644 --- a/guix/git.scm +++ b/guix/git.scm @@ -364,7 +364,8 @@ definitely available in REPOSITORY, false otherwise." (match ref (('commit . (? commit-id? commit)) (let ((oid (string->oid commit))) - (->bool (commit-lookup repository oid)))) + (false-if-git-not-found + (->bool (commit-lookup repository oid))))) ((or ('tag . str) ('tag-or-commit . str)) (false-if-git-not-found