dgit-repos-server: tag2upload: log when we fail and email

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/infra/dgit-repos-server b/infra/dgit-repos-server
index f1308da8e4eaaa418eac0ae86f102a2ba9499b71..c090f7dc1e4c595de0fc392c6a331c8fe874e218 100755 (executable)
--- a/infra/dgit-repos-server
+++ b/infra/dgit-repos-server
@@ -1189,7 +1189,7 @@ END
                 -f$ENV{DGIT_DRS_EMAIL_NOREPLY}        \\
                 <tagupl.email
 END
                 -f$ENV{DGIT_DRS_EMAIL_NOREPLY}        \\
                 <tagupl.email
 END

-       exit 0;
+       $quit->("failed, emailed");

     }
 
     open STDERR, ">&L" or die $!;
     }
 
     open STDERR, ">&L" or die $!;