diff options
author | Christopher Baines <mail@cbaines.net> | 2020-02-11 08:56:24 +0000 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2020-02-11 08:56:24 +0000 |
commit | 9be7dbac0b4ea7b9fabd6c3a66b3d1c95d43e657 (patch) | |
tree | 50d3d7f28b6939936c32a3fea852ba1c6b989e62 /tests | |
parent | 406aa5e160c14ebdc2d9a81d3e64c294a0438849 (diff) | |
download | data-service-9be7dbac0b4ea7b9fabd6c3a66b3d1c95d43e657.tar data-service-9be7dbac0b4ea7b9fabd6c3a66b3d1c95d43e657.tar.gz |
Start storing channel instance derivations
These are the ones that relate to Guix pull.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/jobs-load-new-guix-revision.scm | 30 |
1 files changed, 18 insertions, 12 deletions
diff --git a/tests/jobs-load-new-guix-revision.scm b/tests/jobs-load-new-guix-revision.scm index b5ddc78..b362d55 100644 --- a/tests/jobs-load-new-guix-revision.scm +++ b/tests/jobs-load-new-guix-revision.scm @@ -44,18 +44,24 @@ #t)) (mock - ((guix channels) - channel-news-for-commit - (lambda (channel commit) - '())) - - (match (enqueue-load-new-guix-revision-job - conn - (git-repository-url->git-repository-id conn "test-url") - "test-commit" - "test-source") - ((id) - (process-load-new-guix-revision-job id)))))))) + ((guix-data-service model channel-instance) + insert-channel-instances + (lambda (conn guix-revision-id derivations-by-system) + #t)) + + (mock + ((guix channels) + channel-news-for-commit + (lambda (channel commit) + '())) + + (match (enqueue-load-new-guix-revision-job + conn + (git-repository-url->git-repository-id conn "test-url") + "test-commit" + "test-source") + ((id) + (process-load-new-guix-revision-job id))))))))) (exec-query conn "TRUNCATE guix_revisions CASCADE") (exec-query conn "TRUNCATE load_new_guix_revision_jobs CASCADE") |