[dev] proposed patch to Kernel/System/PostMaster/DestQueue.pm

[Carlos Canau]

Hi,

I proposed the following patch to Kernel/System/PostMaster/DestQueue.pm:

*** DestQueue.pm.ORIG   Thu Aug 28 16:52:43 2003
--- DestQueue.pm        Thu Aug 28 16:53:17 2003
***************
*** 71,77 ****
      foreach (@EmailAddresses) {
          my $Address = $Self->{ParseObject}->GetEmailAddress(Email => $_);
          foreach (keys %SystemAddresses) {
!             if ($_ =~ /\Q$Address/i) {
                  if ($Self->{Debug} > 0) {
                      print STDERR "* matched email: $_ 
(QueueID=$SystemAddresses{$_})\n";
                  }
--- 71,77 ----
      foreach (@EmailAddresses) {
          my $Address = $Self->{ParseObject}->GetEmailAddress(Email => $_);
          foreach (keys %SystemAddresses) {
!             if ($_ =~ /^\Q$Address\E$/i) {
                  if ($Self->{Debug} > 0) {
                      print STDERR "* matched email: $_ 
(QueueID=$SystemAddresses{$_})\n";
                  }

This patch helps  putting the message in the right  queue when we have
SystemAddresses that "include" others. The example:

[EMAIL PROTECTED] -AND- [EMAIL PROTECTED]

I don't  know if this might  have side-effects elsewhere.  I hope that
the authors might know that :-))

Best regards,
</Canau

  DB<34> p ("[EMAIL PROTECTED]" =~ /[EMAIL PROTECTED]/i)
1
  DB<36> p ("[EMAIL PROTECTED]" =~ /[EMAIL PROTECTED]/i)
1
  DB<37> p ("[EMAIL PROTECTED]" =~ /[EMAIL PROTECTED]/i)
1
  DB<38> p ("[EMAIL PROTECTED]" =~ /[EMAIL PROTECTED]/i)

  DB<41> p ("[EMAIL PROTECTED]" =~ /[EMAIL PROTECTED]/i)
1
  DB<42> p ("[EMAIL PROTECTED]" =~ /[EMAIL PROTECTED]/i)

  DB<43> 
_______________________________________________
OTRS mailing list: dev - Webpage: http://otrs.org/
Archive: http://lists.otrs.org/pipermail/dev
To unsubscribe: http://lists.otrs.org/cgi-bin/listinfo/dev