[Rt-commit] r14702 - rt/3.8/trunk/lib/RT/Action

[ruz at bestpractical.com]

Author: ruz
Date: Thu Jul 31 23:05:56 2008
New Revision: 14702

Modified:
   rt/3.8/trunk/lib/RT/Action/SendEmail.pm

Log:
* use correct trimming, map {s/.../.../; } @a maps everything
  to number of substitutions

Modified: rt/3.8/trunk/lib/RT/Action/SendEmail.pm
==============================================================================
--- rt/3.8/trunk/lib/RT/Action/SendEmail.pm	(original)
+++ rt/3.8/trunk/lib/RT/Action/SendEmail.pm	Thu Jul 31 23:05:56 2008
@@ -797,7 +797,7 @@
     # system blacklist
 
     # Trim leading and trailing spaces. # Todo - we should really be canonicalizing all addresses
-    @blacklist = map { s/\s//g; } @blacklist;
+    s/\s//g foreach @blacklist;
     foreach my $type (@EMAIL_RECIPIENT_HEADERS) {
         my @addrs;
         foreach my $addr ( @{ $self->{$type} } ) {