[Rt-commit] r15859 - in rt/branches/3.999-DANGEROUS: sbin

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Mon Sep  8 11:32:49 2008
New Revision: 15859

Modified:
   rt/branches/3.999-DANGEROUS/   (props changed)
   rt/branches/3.999-DANGEROUS/sbin/rt-email-dashboards
   rt/branches/3.999-DANGEROUS/sbin/rt-email-digest

Log:
 r16544 at sunnavys-mb:  sunnavy | 2008-09-08 23:29:25 +0800
 prinicipal_obj => principal for files under sbin


Modified: rt/branches/3.999-DANGEROUS/sbin/rt-email-dashboards
==============================================================================
--- rt/branches/3.999-DANGEROUS/sbin/rt-email-dashboards	(original)
+++ rt/branches/3.999-DANGEROUS/sbin/rt-email-dashboards	Mon Sep  8 11:32:49 2008
@@ -107,7 +107,7 @@
 $Users->limit_to_privileged;
 
 while (defined(my $user = $Users->next)) {
-    if ($user->principal_object->disabled) {
+    if ($user->principal->disabled) {
         debug "Skipping over "
             . $user->name
             . " due to having a disabled account.";

Modified: rt/branches/3.999-DANGEROUS/sbin/rt-email-digest
==============================================================================
--- rt/branches/3.999-DANGEROUS/sbin/rt-email-digest	(original)
+++ rt/branches/3.999-DANGEROUS/sbin/rt-email-digest	Mon Sep  8 11:32:49 2008
@@ -262,7 +262,7 @@
     # behalf?
     my $user_obj = RT::Model::User->new( current_user => RT->system_user );
     $user_obj->load_by_email($user);
-    if ( $user_obj->principal_object->disabled ) {
+    if ( $user_obj->principal->disabled ) {
         print STDERR _("Skipping disabled user") . " $user\n";
         next;
     }