diff options
author | Christopher Baines <mail@cbaines.net> | 2019-05-05 20:23:55 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2019-05-05 20:23:55 +0100 |
commit | b29178ff148d807083f7431a24e7f2b722854f5f (patch) | |
tree | e906a8b1a95c31e9d357fb3bc7314ed2e8b11ab9 | |
parent | 5028dfe706856d11246a7338dfd47d4035d8fb25 (diff) | |
download | data-service-b29178ff148d807083f7431a24e7f2b722854f5f.tar data-service-b29178ff148d807083f7431a24e7f2b722854f5f.tar.gz |
Don't enqueue jobs when branches are deleted
-rw-r--r-- | guix-data-service/branch-updated-emails.scm | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/guix-data-service/branch-updated-emails.scm b/guix-data-service/branch-updated-emails.scm index 3c36f36..5f412eb 100644 --- a/guix-data-service/branch-updated-emails.scm +++ b/guix-data-service/branch-updated-emails.scm @@ -55,8 +55,10 @@ git-repository-id (date->string date "~4")) - (enqueue-load-new-guix-revision-job - conn - git-repository-id - x-git-newrev - (string-append x-git-repo " " x-git-refname " updated")))))) + (unless (string=? "0000000000000000000000000000000000000000" + x-git-newrev) + (enqueue-load-new-guix-revision-job + conn + git-repository-id + x-git-newrev + (string-append x-git-repo " " x-git-refname " updated"))))))) |