[Catalyst-commits] r11405 - trunk/Catalyst-Plugin-Authorization-ACL/t/lib

kmx at dev.catalyst.perl.org kmx at dev.catalyst.perl.org
Thu Sep 24 22:46:56 GMT 2009


Author: kmx
Date: 2009-09-24 22:46:56 +0000 (Thu, 24 Sep 2009)
New Revision: 11405

Modified:
   trunk/Catalyst-Plugin-Authorization-ACL/t/lib/ACLTestApp.pm
Log:
C::P::Authorization::ACL - fix for failing test t/live_app.t (change just in TestApp)

Modified: trunk/Catalyst-Plugin-Authorization-ACL/t/lib/ACLTestApp.pm
===================================================================
--- trunk/Catalyst-Plugin-Authorization-ACL/t/lib/ACLTestApp.pm	2009-09-24 16:40:31 UTC (rev 11404)
+++ trunk/Catalyst-Plugin-Authorization-ACL/t/lib/ACLTestApp.pm	2009-09-24 22:46:56 UTC (rev 11405)
@@ -87,7 +87,9 @@
 __PACKAGE__->acl_add_rule("/zoo/penguins/tux", sub {
 	my ( $c, $action ) = @_;
 	my $user = $c->user;
-	die ( ( $user && $user->os eq "linux" ) ? $ALLOWED : $DENIED );
+	die ( ( $user && $user->os eq "linux" ) ? 
+                $Catalyst::Plugin::Authorization::ACL::Engine::ALLOWED : 
+                $Catalyst::Plugin::Authorization::ACL::Engine::DENIED );
 });
 
 __PACKAGE__->allow_access_if("/zoo/penguins/madagascar", sub { 




More information about the Catalyst-commits mailing list