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

[ruz at bestpractical.com]

Author: ruz
Date: Tue Dec 29 03:45:20 2009
New Revision: 20243

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

Log:
* don't warn about redefining subject tag

Modified: RT-BugTracker/lib/RT/BugTracker.pm
==============================================================================
--- RT-BugTracker/lib/RT/BugTracker.pm	(original)
+++ RT-BugTracker/lib/RT/BugTracker.pm	Tue Dec 29 03:45:20 2009
@@ -113,6 +113,9 @@
 sub SubjectTagRE {
     return qr/[a-z0-9 ._-]/i;
 }
+
+{
+no warnings 'redefine';
 sub SubjectTag {
     return (shift)->_AttributeBasedField(
         SubjectTag => @_
@@ -129,6 +132,7 @@
         SubjectTag => $value, @_
     );
 }
+}
 
 sub _AttributeBasedField {
     my $self = shift;