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

Support a source for a job

Browse source 
To describe why this job was enqueued.
This commit is contained in:
Christopher Baines 2019-02-28 18:32:51 +00:00
parent 46c724456f
commit 17e76b4ef1
Signed by: cbaines
GPG key ID: 5E28A33B0B84F577
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -160,10 +160,10 @@
conn conn
"SELECT * FROM load_new_guix_revision_jobs ORDER BY id ASC LIMIT 1"))) "SELECT * FROM load_new_guix_revision_jobs ORDER BY id ASC LIMIT 1")))
(match next (match next
(((id url commit)) (((id url commit source))
(begin (begin
(simple-format #t "Processing job ~A (url: ~A, commit: ~A)\n\n" (simple-format #t "Processing job ~A (url: ~A, commit: ~A, source: ~A)\n\n"
id url commit) id url commit source)
(load-new-guix-revision conn url commit) (load-new-guix-revision conn url commit)
(exec-query (exec-query
conn conn