[request-tracker-maintainers] Bug#463466: request-tracker3.6: Enhancement to provide a global squelch list

[Chris Adams]

Package: request-tracker3.6
Version: 3.6.1-4
Severity: wishlist
Tags: patch


The attached patch allows you to create a SiteConfig variable containing
a list of addresses which RT should not send email to:

Set($SquelchList, 'root at example.edu,www-data at example.edu,nobody at example.edu');

-- Package-specific info:
Changed files:
  usr/share/request-tracker3.6/html/Ticket/Elements/Tabs
  usr/share/request-tracker3.6/lib/RT/Action/SendEmail.pm
  usr/share/request-tracker3.6/lib/RT/Interface/Web.pm
  usr/share/request-tracker3.6/lib/RT/Report/Tickets.pm

-- System Information:
Debian Release: 4.0
  APT prefers stable
  APT policy: (990, 'stable')
Architecture: i386 (i686)
Shell:  /bin/sh linked to /bin/bash
Kernel: Linux 2.6.18-6-k7
Locale: LANG=en_US, LC_CTYPE=en_US (charmap=ISO-8859-1)

Versions of packages request-tracker3.6 depends on:
ii  exim4                       4.63-17      metapackage to ease exim MTA (v4) 
ii  exim4-daemon-light [mail-tr 4.63-17      lightweight exim MTA (v4) daemon
ii  libapache-session-perl      1.81-1       Perl modules for keeping persisten
ii  libcache-cache-perl         1.05-2       Managed caches of persistent infor
ii  libcache-simple-timedexpiry 0.26-1       Perl module to cache and expire ke
ii  libcalendar-simple-perl     1.17-2       Perl extension to create simple ca
ii  libclass-returnvalue-perl   0.53-1       A return-value object that lets yo
ii  libdbd-mysql-perl           3.0008-1     A Perl5 database interface to the 
ii  libdbd-pg-perl              1.49-2       a PostgreSQL interface for Perl 5 
ii  libdbi-perl                 1.53-1etch1  Perl5 database interface by Tim Bu
ii  libdbix-searchbuilder-perl  1.45-2       Encapsulate SQL queries and rows i
ii  libexception-class-perl     1.21-1       a module that allows you to declar
ii  libfcgi-perl                0.67-2       FastCGI Perl module
ii  libfreezethaw-perl          0.43-3       converting Perl structures to stri
ii  libgd-graph-perl            1.43.08-2.1  Graph Plotting Module for Perl 5
ii  libgd-text-perl             0.86-3.1     Text utilities for use with GD
ii  libhtml-mason-perl          1:1.35-3     HTML::Mason Perl module
ii  libhtml-parser-perl         3.55-1       A collection of modules that parse
ii  libhtml-scrubber-perl       0.08-3       Perl extension for scrubbing/sanit
ii  liblocale-maketext-fuzzy-pe 0.02-2       Maketext from already interpolated
ii  liblocale-maketext-lexicon- 0.62-1       Lexicon-handling backends for "Loc
ii  liblog-dispatch-perl        2.11-1       Dispatches messages to multiple Lo
ii  libmailtools-perl           1.74-1       Manipulate email in perl programs
ii  libmime-perl                5.420-0.1    Perl5 modules for MIME-compliant m
ii  libmldbm-perl               2.01-1       Store multidimensional hash struct
ii  libmodule-versions-report-p 1.02-3       Report versions of all modules in 
ii  libparams-validate-perl     0.77-1       validate parameters to Perl method
ii  libregexp-common-perl       2.120-4      Provide commonly requested regular
ii  libterm-readkey-perl        2.30-3       A perl module for simple terminal 
ii  libtest-inline-perl         2.103-1      Perl extension for embed tests and
ii  libtext-autoformat-perl     1.13-1       Perl module for automatic text wra
ii  libtext-quoted-perl         1.8-3        Extract the structure of a quoted 
ii  libtext-template-perl       1.44-1.1     Text::Template perl module
ii  libtext-wikiformat-perl     0.78-0.1     translates Wiki formatted text int
ii  libtext-wrapper-perl        1.000-2      Simple word wrapping routine
ii  libtime-modules-perl        2003.1126-2  Various Perl modules for time/date
ii  libtree-simple-perl         1.17-1       A simple tree object
ii  libuniversal-require-perl   0.10-1       Load modules from a variable
ii  libxml-rss-perl             1.05-1       Perl module for managing RSS (RDF 
ii  libxml-simple-perl          2.14-5       Perl module for reading and writin
ii  perl                        5.8.8-7etch1 Larry Wall's Practical Extraction 
ii  rt3.6-apache2               3.6.1-4      Apache 2 specific files for reques
ii  rt3.6-clients               3.6.1-4      Mail gateway and command-line inte
ii  syslog-ng [system-log-daemo 2.0.0-1etch1 Next generation logging daemon

Versions of packages request-tracker3.6 recommends:
ii  mysql-server-5.0 [mysql-se 5.0.32-7etch5 mysql database server binaries

-- debconf-show failed
-------------- next part --------------
--- SendEmail.pm	2008-01-31 11:51:15.344883000 -0800
+++ /usr/share/request-tracker3.6/lib/RT/Action/SendEmail.pm	2008-01-31 11:54:30.000000000 -0800
@@ -593,6 +593,15 @@
         push @blacklist, $attribute->Content;
     }
 
+		# BEGIN SNL Modification: global squelch list
+		#	This allows you to add a variable to RT_SiteConfig.pm containing addresses which will always be squelched: 
+		# Set($SquelchList, 'root at example.edu,www-data at example.edu,nobody at example.edu');
+		if ($RT::SquelchList) {
+      $RT::Logger->debug("Using global squelch list: $RT::SquelchList\n");
+			push @blacklist, split(/,/, $RT::SquelchList);
+		}
+		# END SNL Modification: global squelch list
+
     # Cycle through the people we're sending to and pull out anyone on the
     # system blacklist