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

Fix load revision jobs not failing if the extraction of data fails

Browse source
This commit is contained in:
Christopher Baines 2021-03-25 17:57:48 +00:00
parent 0175914f79
commit 410f58cb43
1 changed files with 19 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -1370,27 +1370,27 @@ WHERE job_id = $1")
store store
channel-derivations-by-system))) channel-derivations-by-system)))
(if store-item (if store-item
(begin (and
(extract-information-from conn store (extract-information-from conn store
guix-revision-id guix-revision-id
commit store-item) commit store-item)
(if (defined? 'channel-news-for-commit (if (defined? 'channel-news-for-commit
(resolve-module '(guix channels))) (resolve-module '(guix channels)))
(with-time-logging "inserting channel news entries" (with-time-logging "inserting channel news entries"
(insert-channel-news-entries-for-guix-revision (insert-channel-news-entries-for-guix-revision
conn conn
guix-revision-id guix-revision-id
(channel-news-for-commit channel-for-commit commit))) (channel-news-for-commit channel-for-commit commit)))
(begin (begin
(simple-format (simple-format
#t "debug: importing channel news not supported\n") #t "debug: importing channel news not supported\n")
#t)) #t))
(update-package-derivations-table conn (update-package-derivations-table conn
git-repository-id git-repository-id
guix-revision-id guix-revision-id
commit)) commit))
(begin (begin
(simple-format #t "Failed to generate store item for ~A\n" (simple-format #t "Failed to generate store item for ~A\n"
commit) commit)