guix: inferior: Use channel-reference to get a Git reference.

* guix/inferior.scm (channel-full-commit): Use channel-reference to get a Git reference.

Change-Id: Ia07f8d202ba1df1497d2763d8d49d547c6955ca6
This commit is contained in:
Romain GARBAGE 2025-08-26 16:05:32 +02:00
parent 3c2ce18e43
commit 56cee947fa
No known key found for this signature in database
GPG key ID: 293403FE476B7D63

View file

@ -872,7 +872,8 @@ prefix, resolve it; and if 'commit' is unset, fetch CHANNEL's branch tip."
(branch (channel-branch channel)))
(if (and commit (commit-id? commit))
commit
(let* ((ref (if commit `(tag-or-commit . ,commit) `(branch . ,branch)))
(let* ((ref (if commit `(tag-or-commit . ,commit)
(channel-reference channel)))
(cache commit relation
(update-cached-checkout (channel-url channel)
#:ref ref