[Rt-commit] r6211 - in rt/branches/3.6-RELEASE: .

[jesse at bestpractical.com]

Author: jesse
Date: Mon Oct 16 11:49:02 2006
New Revision: 6211

Modified:
   rt/branches/3.6-RELEASE/   (props changed)
   rt/branches/3.6-RELEASE/lib/RT/Interface/Email.pm

Log:
 r28886 at pinglin:  jesse | 2006-10-16 11:48:54 -0400
 * Added a workaround for parsing headers from broken  MUAs that send headers like:
 
     From: ""Vincent, Jesse"" <jesse at fsck.com>
 
 


Modified: rt/branches/3.6-RELEASE/lib/RT/Interface/Email.pm
==============================================================================
--- rt/branches/3.6-RELEASE/lib/RT/Interface/Email.pm	(original)
+++ rt/branches/3.6-RELEASE/lib/RT/Interface/Email.pm	Mon Oct 16 11:49:02 2006
@@ -444,6 +444,8 @@
 sub ParseAddressFromHeader {
     my $Addr = shift;
 
+    # Some broken mailers send:  ""Vincent, Jesse"" <jesse at fsck.com>. Hate
+    $Addr =~ s/\"\"(.*?)\"\"/\"$1\"/g;                                                                                                                                                  
     my @Addresses = Mail::Address->parse($Addr);
 
     my ($AddrObj) = grep ref $_, @Addresses;