[Rt-commit] r3948 - rt/branches/3.4-RELEASE/lib/RT/Action

[ruz at bestpractical.com]

Author: ruz
Date: Mon Oct 10 20:01:50 2005
New Revision: 3948

Modified:
   rt/branches/3.4-RELEASE/lib/RT/Action/SendEmail.pm
Log:
* get rid of "not a number" warning

Modified: rt/branches/3.4-RELEASE/lib/RT/Action/SendEmail.pm
==============================================================================
--- rt/branches/3.4-RELEASE/lib/RT/Action/SendEmail.pm	(original)
+++ rt/branches/3.4-RELEASE/lib/RT/Action/SendEmail.pm	Mon Oct 10 20:01:50 2005
@@ -445,7 +445,7 @@
 
       # If there is one, and we can parse it, then base our Message-ID on it
       if ($msgid 
-          and $msgid =~ s/<(rt-.*?-\d+-\d+)\.(\d+-0-0)\@$RT::Organization>$/
+          and $msgid =~ s/<(rt-.*?-\d+-\d+)\.(\d+)-\d+-\d+\@\Q$RT::Organization\E>$/
                          "<$1." . $self->TicketObj->id
                           . "-" . $self->ScripObj->id
                           . "-" . $self->ScripActionObj->{_Message_ID}