diff options
| author | Christopher Baines <mail@cbaines.net> | 2020-02-09 10:20:36 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2020-02-09 10:20:36 +0000 |
| commit | 3ee481110ec0f821b4f0342bf8ab498b55d77e79 (patch) | |
| tree | 07bcfae7aabd63a770fee815802959be93cd53e6 | |
| parent | 82b1ae6b7541d9174e9ab8cb492e1167b869806b (diff) | |
| download | data-service-3ee481110ec0f821b4f0342bf8ab498b55d77e79.tar data-service-3ee481110ec0f821b4f0342bf8ab498b55d77e79.tar.gz | |
Shift extracting channel news to later on
To avoid race conditions between jobs, have it happen after the call to
extract-information-from.
| -rw-r--r-- | guix-data-service/jobs/load-new-guix-revision.scm | 15 |
1 files changed, 9 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 e494485..dff4f88 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -1135,18 +1135,21 @@ ORDER BY packages.name, packages.version" commit store-item))) (and guix-revision-id + (extract-information-from conn guix-revision-id + commit store-item) (if (defined? 'channel-news-for-commit (resolve-module '(guix channels))) - (insert-channel-news-entries-for-guix-revision - conn - guix-revision-id - (channel-news-for-commit channel-for-commit commit)) + (log-time + "inserting channel news entries" + (lambda () + (insert-channel-news-entries-for-guix-revision + conn + guix-revision-id + (channel-news-for-commit channel-for-commit commit)))) (begin (simple-format #t "debug: importing channel news not supported\n") #t)) - (extract-information-from conn guix-revision-id - commit store-item) (update-package-versions-table conn git-repository-id commit) (update-package-derivations-table conn git-repository-id |