diff options
author | bbaetz%student.usyd.edu.au <> | 2002-03-04 07:06:19 +0100 |
---|---|---|
committer | bbaetz%student.usyd.edu.au <> | 2002-03-04 07:06:19 +0100 |
commit | 71cf359f2a6fb43f6cc529fb36f41000a7fd796e (patch) | |
tree | e33490ebde8174bd05f322e34311ea4c0ed8f17f /sanitycheck.cgi | |
parent | e13d5c8aba26905724af6ffff0ce5d353c0ced31 (diff) | |
download | bugzilla-71cf359f2a6fb43f6cc529fb36f41000a7fd796e.tar.gz bugzilla-71cf359f2a6fb43f6cc529fb36f41000a7fd796e.tar.xz |
Bug 106377 - processmail rescanall should use lastdiffed
r=justdave, ddkilzer@theracingworld.com
Diffstat (limited to 'sanitycheck.cgi')
-rwxr-xr-x | sanitycheck.cgi | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/sanitycheck.cgi b/sanitycheck.cgi index c85a3668e..902557bb8 100755 --- a/sanitycheck.cgi +++ b/sanitycheck.cgi @@ -583,6 +583,30 @@ if (@badbugs > 0) { } ########################################################################### +# Unsent mail +########################################################################### + +Status("Checking for unsent mail"); + +@badbugs = (); + +SendSQL("SELECT bug_id " . + "FROM bugs WHERE lastdiffed < delta_ts AND ". + "delta_ts < date_sub(now(), INTERVAL 30 minute) ". + "ORDER BY bug_id"); + +while (@row = FetchSQLData()) { + my ($id) = (@row); + push(@badbugs, $id); +} + +if (@badbugs > 0) { + Alert("Bugs that have changes but no mail sent for at least half an hour: " . + join (", ", @badbugs)); + print("Run <code>processmail rescanall</code> to fix this<p>\n"); +} + +########################################################################### # End ########################################################################### |