summary refs log tree commit diff
diff options
context:
space:
mode:
authorSimon Tournier <zimon.toutoune@gmail.com>2023-09-25 12:00:18 +0200
committerSimon Tournier <zimon.toutoune@gmail.com>2023-09-25 12:00:18 +0200
commit94f3831e5bb1e04eeb3a0e7d31a0675208ce6f4c (patch)
tree375a0774edeb6bc5d51e99b8728582aa051b482a
parentbe5bec47f7942a5e4d2a30eadd9a6fa4c715e88b (diff)
downloadguix-94f3831e5bb1e04eeb3a0e7d31a0675208ce6f4c.tar.gz
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.
-rw-r--r--guix/git.scm3
1 files changed, 2 insertions, 1 deletions
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