diff options
-rw-r--r-- | guix-data-service/jobs/load-new-guix-revision.scm | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm index 9f46c47..fec32b9 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -1249,7 +1249,7 @@ derivation-file-name))) 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) @@ -1679,16 +1679,13 @@ (channel (name 'guix) (url git-repository-url) (commit commit))) - (source-and-channel-derivations-by-system + (guix-source + channel-derivations-by-system (channel->source-and-derivations-by-system conn channel-for-commit fetch-with-authentication? #: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 (load-channel-instances git-repository-id commit channel-derivations-by-system))) |