From 45cba2bb5495276c3d5cd9ee3f7dd19227fd00c2 Mon Sep 17 00:00:00 2001
From: "mark%moxienet.com"
 <mark%moxienet.com@18797224-902f-48f8-a5cc-f745e15eee43>
Date: Fri, 3 Aug 2007 17:49:21 +0000
Subject: [PATCH] 388982 Tinderbox server losing mail, causing perpetually
 yellow builds.  Add a subject to Tinderbox status e-mails.  r=coop. 
 Recommitting as-is, cf says that the problems on bl-bldlnx03 and bl-bldxp01
 are unrelated to this patch.

git-svn-id: svn://10.0.0.236/trunk@231431 18797224-902f-48f8-a5cc-f745e15eee43
---
 mozilla/tools/tinderbox/build-seamonkey-util.pl | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/mozilla/tools/tinderbox/build-seamonkey-util.pl b/mozilla/tools/tinderbox/build-seamonkey-util.pl
index acd5a148d7d..fb5850f5e23 100644
--- a/mozilla/tools/tinderbox/build-seamonkey-util.pl
+++ b/mozilla/tools/tinderbox/build-seamonkey-util.pl
@@ -24,7 +24,7 @@ use Config;         # for $Config{sig_name} and $Config{sig_num}
 use File::Find ();
 use File::Copy;
 
-$::UtilsVersion = '$Revision: 1.365 $ ';
+$::UtilsVersion = '$Revision: 1.366 $ ';
 
 package TinderUtils;
 
@@ -724,7 +724,8 @@ sub mail_build_started_message {
     if ($Settings::blat ne "" && $Settings::use_blat) {
         system("$Settings::blat $msg_log -to $Settings::Tinderbox_server");
     } else {
-        system "$Settings::mail $Settings::Tinderbox_server "
+        system "$Settings::mail -s 'Tinderbox started $Settings::BuildName' ".
+               "$Settings::Tinderbox_server "
             ." < $msg_log";
     }
     unlink "$msg_log";
@@ -753,7 +754,7 @@ sub mail_build_failed_message {
     if ($Settings::blat ne "" && $Settings::use_blat) {
         system("$Settings::blat $msg_log -to $Settings::FailedBuildAdministrator");
     } else {
-        system "$Settings::mail " .
+        system "$Settings::mail -s 'Tinderbox failed $Settings::BuildName' " .
             "$Settings::FailedBuildAdministrator < $msg_log";
     }
     unlink "$msg_log";
@@ -858,7 +859,9 @@ sub mail_build_finished_message {
         if ($Settings::blat ne "" && $Settings::use_blat) {
             system("$Settings::blat $logfile.last -to $Settings::Tinderbox_server");
         } else {
-            system "$Settings::mail $Settings::Tinderbox_server "
+            system "$Settings::mail ".
+                   "-s 'Tinderbox $build_status $Settings::BuildName' ".
+                   "$Settings::Tinderbox_server "
                 ." < $logfile.last";
         }
     }