diff options
Diffstat (limited to 'guix-data-service/branch-updated-emails.scm')
| -rw-r--r-- | guix-data-service/branch-updated-emails.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/guix-data-service/branch-updated-emails.scm b/guix-data-service/branch-updated-emails.scm index 739af8a..284fe49 100644 --- a/guix-data-service/branch-updated-emails.scm +++ b/guix-data-service/branch-updated-emails.scm @@ -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 |