[Rt-commit] r14257 - in rt/branches/3.999-DANGEROUS: lib/RT

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Fri Jul 18 03:12:13 2008
New Revision: 14257

Modified:
   rt/branches/3.999-DANGEROUS/   (props changed)
   rt/branches/3.999-DANGEROUS/lib/RT/Dashboard.pm

Log:
 r14681 at sunnavys-mb:  sunnavy | 2008-07-18 15:11:54 +0800
 name fix


Modified: rt/branches/3.999-DANGEROUS/lib/RT/Dashboard.pm
==============================================================================
--- rt/branches/3.999-DANGEROUS/lib/RT/Dashboard.pm	(original)
+++ rt/branches/3.999-DANGEROUS/lib/RT/Dashboard.pm	Fri Jul 18 03:12:13 2008
@@ -237,8 +237,8 @@
 
     push @objects, $CurrentUser->user_object
       if $self->current_user->has_right(
-        Right  => "${prefix}OwnDashboard",
-        Object => $RT::System,
+        right  => "${prefix}OwnDashboard",
+        object => $RT::System,
       );
 
     my $groups = RT::Model::GroupCollection->new( current_user => $CurrentUser );
@@ -295,8 +295,8 @@
         return 0 unless $object->id == $self->current_user->id;
     }
 
-    my $right = $args{FullRight}
-      || join( '', $args{Right}, $level, 'Dashboard' );
+    my $right = $args{full_right}
+      || join( '', $args{right}, $level, 'Dashboard' );
 
     # all rights, except group rights, are global
     $object = $RT::System unless $object->isa('RT::Model::Group');