[Bps-public-commit] r17112 - RT-Extension-Captcha/lib/RT/Extension

[ruz at bestpractical.com]

Author: ruz
Date: Fri Dec  5 06:43:03 2008
New Revision: 17112

Modified:
   RT-Extension-Captcha/lib/RT/Extension/Captcha.pm

Log:
* register canonic rights

Modified: RT-Extension-Captcha/lib/RT/Extension/Captcha.pm
==============================================================================
--- RT-Extension-Captcha/lib/RT/Extension/Captcha.pm	(original)
+++ RT-Extension-Captcha/lib/RT/Extension/Captcha.pm	Fri Dec  5 06:43:03 2008
@@ -41,6 +41,10 @@
 $RT::Queue::RIGHTS->{'NoCaptchaOnCreate'} = "Don't ask user to solve a CAPTCHA on ticket create"; #loc_pair
 $RT::Queue::RIGHTS->{'NoCaptchaOnUpdate'} = "Don't ask user to solve a CAPTCHA on ticket reply or comment"; #loc_pair
 
+use RT::ACE;
+$RT::ACE::LOWERCASERIGHTNAMES{ lc $_ } = $_
+    foreach qw(NoCaptchaOnCreate NoCaptchaOnUpdate);
+
 =head1 LICENSE
 
 Under the same terms as perl itself.