diff options
author | terry%mozilla.org <> | 2000-01-15 07:35:24 +0100 |
---|---|---|
committer | terry%mozilla.org <> | 2000-01-15 07:35:24 +0100 |
commit | 5eee338175a2f2bf78290ad4154639a2972077ee (patch) | |
tree | 2b407e5c7fb1bdd8fe26820c9e5e81775b784b0f /processmail | |
parent | 5c232e771356b52b3acb962e258ccf83c792f68c (diff) | |
download | bugzilla-5eee338175a2f2bf78290ad4154639a2972077ee.tar.gz bugzilla-5eee338175a2f2bf78290ad4154639a2972077ee.tar.xz |
Patch by Ramon Felciano <felciano@ingenuity.com>, with many tweaks by
me. Added a footer to every page. Add some options to do things like
display checkboxes instead of scrolling lists, and a new formatting
for email diffs, and show list items capitalized instead of all upper
case.
Diffstat (limited to 'processmail')
-rwxr-xr-x | processmail | 33 |
1 files changed, 32 insertions, 1 deletions
diff --git a/processmail b/processmail index 8e0b7c29f..e85a5eaf8 100755 --- a/processmail +++ b/processmail @@ -212,8 +212,36 @@ sub GetBugText { $::bug{'cclist'} = join(',', @cclist); $::bug{'voterlist'} = join(',', @voterlist); + if (Param("prettyasciimail")) { + my $temp = formline <<'END',$::bug{'short_desc'},$id,$::bug{'product'},$::bug{'bug_status'},$::bug{'version'},$::bug{'resolution'},$::bug{'rep_platform'},$::bug{'bug_severity'},$::bug{'op_sys'},$::bug{'priority'},$::bug{'component'},$::bug{'assigned_to'},$::bug{'reporter'},$qa_contact,DescCC(\@cclist),$target_milestone,${status_whiteboard},$::bug{'bug_file_loc'},DescDependencies($id); ++============================================================================+ +| @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< | ++----------------------------------------------------------------------------+ +| Bug #: @<<<<<<<<<<< Product: @<<<<<<<<<<<<<<<<<<<<<< | +| Status: @<<<<<<<<<<<<<<<<<< Version: @<<<<<<<<<<<<<<<<<<<<<< | +| Resolution: @<<<<<<<<<<<<<<<<<< Platform: @<<<<<<<<<<<<<<<<<<<<<< | +| Severity: @<<<<<<<<<<<<<<<<<< OS/Version: @<<<<<<<<<<<<<<<<<<<<<< | +| Priority: @<<<<<<<<<<<<<<<<<< Component: @<<<<<<<<<<<<<<<<<<<<<< | ++----------------------------------------------------------------------------+ +| Assigned To: @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< | +| Reported By: @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< | +| ~QA Contact: ^<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< | +| ~ CC list: ^<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< | ++----------------------------------------------------------------------------+ +| ~ Milestone: ^<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< | +|~ Whiteboard: ^<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< | +| URL: @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< | +|~Dependencies: ^<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< | ++============================================================================+ +| DESCRIPTION | +END + + my $prettymail = $^A . $::bug{'long_desc'}; + return $prettymail; - return "Bug\#: $id + + } else { + return "Bug\#: $id Product: $::bug{'product'} Version: $::bug{'version'} Platform: $::bug{'rep_platform'} @@ -230,6 +258,7 @@ $qa_contact$target_milestone${status_whiteboard}URL: $::bug{'bug_file_loc'} " . DescDependencies($id) . " $::bug{'long_desc'} "; +} } @@ -313,6 +342,7 @@ sub ProcessOneBug { if ($tolist ne "" || $cclist ne "") { my %substs; + $substs{"fullbugreport"} = $text; # added ability to include the full bug report $substs{"to"} = $tolist; $substs{"cc"} = $cclist; $substs{"bugid"} = $i; @@ -331,6 +361,7 @@ sub ProcessOneBug { # harmless. open(SENDMAIL, "|/usr/lib/sendmail -t") || die "Can't open sendmail"; + print SENDMAIL $msg; close SENDMAIL; $logstr = "$logstr; mail sent to $tolist, $cclist"; |