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

Check the type of the header values in branch-updated-emails

Browse source
This commit is contained in:
Christopher Baines 2019-03-19 20:42:55 +00:00
parent bdfb654233
commit be6acf8e3b
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
guix-data-service/branch-updated-emails.scm
View file

@ -29,8 +29,10 @@
(x-git-reftype (assq-ref headers 'x-git-reftype))
(x-git-refname (assq-ref headers 'x-git-refname))
(x-git-newrev (assq-ref headers 'x-git-newrev)))
(when (and (string=? x-git-reftype "branch")
(string=? x-git-repo "guix")
(when (and (and (string? x-git-reftype)
(string=? x-git-reftype "branch"))
(and (string? x-git-repo)
(string=? x-git-repo "guix"))
(string? x-git-newrev))
(enqueue-load-new-guix-revision-job
conn