Bug 70710: More expandable tags within emails - Patch by Alan Siu-Lung Tam <Tam@SiuLung.com> r=vladd a=myk

1 files changed, 8 insertions, 0 deletions

diff --git a/Bugzilla/BugMail.pm b/Bugzilla/BugMail.pm
index 89bebaab3..4d151cd7f 100644
--- a/Bugzilla/BugMail.pm
+++ b/Bugzilla/BugMail.pm
@@ -246,6 +246,7 @@ sub ProcessOneBug {
     my $diffheader = "";
     my @diffparts;
     my $lastwho = "";
+    my @changedfields;
     foreach my $ref (@$diffs) {
         my ($who, $what, $when, $old, $new, $attachid, $fieldname) = (@$ref);
         my $diffpart = {};
@@ -271,7 +272,9 @@ sub ProcessOneBug {
         $diffpart->{'fieldname'} = $fieldname;
         $diffpart->{'text'} = $difftext;
         push(@diffparts, $diffpart);
+        push(@changedfields, $what);
     }
+    $values{'changed_fields'} = join(' ', @changedfields);
 
     my $deptext = "";
 
@@ -625,6 +628,11 @@ sub sendMail {
     $substs{"component"} = $values{'component'};
     $substs{"keywords"} = $values{'keywords'};
     $substs{"severity"} = $values{'bug_severity'};
+    $substs{"status"} = $values{'bug_status'};
+    $substs{"priority"} = $values{'priority'};
+    $substs{"assignedto"} = $values{'assigned_to'};
+    $substs{"targetmilestone"} = $values{'target_milestone'};
+    $substs{"changedfields"} = $values{'changed_fields'};
     $substs{"summary"} = $values{'short_desc'};
     my (@headerrel, @watchingrel);
     while (my ($rel, $bits) = each %{$relRef}) {