cbaines/guix-data-service
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Return two values from channel->source-and-derivations-by-system

Browse source
This commit is contained in:
Christopher Baines 2024-07-19 11:50:14 +01:00
parent b8d9ed19b2
commit 2da3a195ea
1 changed files with 3 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

9
guix-data-service/jobs/load-new-guix-revision.scm
View file

@ -1249,7 +1249,7 @@
derivation-file-name))) derivation-file-name)))
derivation-file-names-by-system) derivation-file-names-by-system)
(cons source derivation-file-names-by-system)))) (values source derivation-file-names-by-system))))
(prevent-inlining-for-tests channel->source-and-derivations-by-system) (prevent-inlining-for-tests channel->source-and-derivations-by-system)
@ -1679,16 +1679,13 @@
(channel (name 'guix) (channel (name 'guix)
(url git-repository-url) (url git-repository-url)
(commit commit))) (commit commit)))
(source-and-channel-derivations-by-system (guix-source
channel-derivations-by-system
(channel->source-and-derivations-by-system (channel->source-and-derivations-by-system
conn conn
channel-for-commit channel-for-commit
fetch-with-authentication? fetch-with-authentication?
#:parallelism parallelism)) #:parallelism parallelism))
(guix-source
(car source-and-channel-derivations-by-system))
(channel-derivations-by-system
(cdr source-and-channel-derivations-by-system))
(guix-revision-id (guix-revision-id
(load-channel-instances git-repository-id commit (load-channel-instances git-repository-id commit
channel-derivations-by-system))) channel-derivations-by-system)))