guix/data-service
2
0
Fork 0
mirror of git://git.savannah.gnu.org/guix/data-service.git synced 2023-12-14 03:23:03 +01:00
Code Issues Releases Wiki Activity

Guard against errors getting derivations for packages

Browse source
This commit is contained in:
Christopher Baines 2019-03-03 17:06:11 +00:00
parent 853a2e4125
commit ffdd2416f4
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577
1 changed files with 17 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -23,10 +23,22 @@
(packages-metadata-ids
(inferior-packages->package-metadata-ids conn packages))
(packages-derivation-ids
(derivations->derivation-ids conn
(map (lambda (package)
(derivations->derivation-ids
conn
(filter-map
(lambda (package)
(catch
#t
(lambda ()
(inferior-package-derivation
store package))
(lambda args
(simple-format
#t "guix-data-service: inferior-guix->package-ids: error processing derivation ~A\n"
package)
(simple-format
#t "guix-data-service: inferior-guix->package-ids: error: ~A\n" args)
#f)))
packages))))
(inferior-packages->package-ids