[Bps-public-commit] r20145 - RT-BugTracker/lib/RT

[ruz at bestpractical.com]

Author: ruz
Date: Tue Nov 24 16:12:02 2009
New Revision: 20145

Modified:
   RT-BugTracker/lib/RT/BugTracker.pm

Log:
* hide redefine warning

Modified: RT-BugTracker/lib/RT/BugTracker.pm
==============================================================================
--- RT-BugTracker/lib/RT/BugTracker.pm	(original)
+++ RT-BugTracker/lib/RT/BugTracker.pm	Tue Nov 24 16:12:02 2009
@@ -173,6 +173,7 @@
 my $tag_re = RT::Queue->SubjectTagRE;
 $RT::EmailSubjectTagRegex = qr/\Q$RT::rtname\E(?:\s+$tag_re+)?/;
 
+no warnings 'redefine';
 my $old = \&SetSubjectToken;
 *RT::Action::SendEmail::SetSubjectToken = sub {
     my $self = shift;