[Rt-commit] r6525 - in rt/branches/3.7-EXPERIMENTAL: .

[ruz at bestpractical.com]

Author: ruz
Date: Sun Nov 26 17:46:04 2006
New Revision: 6525

Modified:
   rt/branches/3.7-EXPERIMENTAL/   (props changed)
   rt/branches/3.7-EXPERIMENTAL/lib/RT/Ticket_Overlay.pm

Log:
 r4182 at cubic-pc:  cubic | 2006-11-27 01:49:46 +0300
  r3515 at cubic-pc:  cubic | 2006-06-29 07:02:05 +0400
  RT::Ticket::DueObj
  * don't call due when we have it allread available
  
  RT::Ticket::CurrentUserHasRight
  * use less indirect codepath
  
 


Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT/Ticket_Overlay.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT/Ticket_Overlay.pm	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT/Ticket_Overlay.pm	Sun Nov 26 17:46:04 2006
@@ -2068,8 +2068,8 @@
     my $time = new RT::Date( $self->CurrentUser );
 
     # -1 is RT::Date slang for never
-    if ( $self->Due ) {
-        $time->Set( Format => 'sql', Value => $self->Due );
+    if ( my $due = $self->Due ) {
+        $time->Set( Format => 'sql', Value => $due );
     }
     else {
         $time->Set( Format => 'unix', Value => -1 );
@@ -3628,13 +3628,10 @@
     my $self  = shift;
     my $right = shift;
 
-    return (
-        $self->HasRight(
-            Principal => $self->CurrentUser->UserObj(),
-            Right     => "$right"
-          )
-    );
-
+    return $self->CurrentUser->PrincipalObj->HasRight(
+        Object => $self,
+        Right  => $right,
+    )
 }
 
 # }}}