From a513c0bef534d05f03c1242831b6f3be19b97dae Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 17 Oct 2006 08:51:01 +0000
Subject: import rt 3.4.5

---
 rt/lib/RT/EmailParser.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'rt/lib/RT/EmailParser.pm')

diff --git a/rt/lib/RT/EmailParser.pm b/rt/lib/RT/EmailParser.pm
index 3a99e5a5e..eccc20a2f 100644
--- a/rt/lib/RT/EmailParser.pm
+++ b/rt/lib/RT/EmailParser.pm
@@ -277,7 +277,7 @@ sub _PostProcessNewEntity {
 
 sub ParseTicketId {
     my $self = shift;
-    $RT::Logger->warnings("RT::EmailParser->ParseTicketId deprecated. You should be using RT::Interface::Email");
+    $RT::Logger->warnings("RT::EmailParser->ParseTicketId deprecated. You should be using RT::Interface::Email at (". join(":",caller).")");
 
     require RT::Interface::Email;
     RT::Interface::Email::ParseTicketId(@_);
@@ -435,7 +435,7 @@ sub IsRTAddress {
     # Example: the following rule would tell RT not to Cc 
     #   "tickets@noc.example.com"
     if ( defined($RT::RTAddressRegexp) &&
-                       $address =~ /$RT::RTAddressRegexp/ ) {
+                       $address =~ /$RT::RTAddressRegexp/i ) {
         return(1);
     } else {
         return (undef);
-- 
cgit v1.2.1