Changeset 1922 for trunk/LATMOS-Accounts/lib

Timestamp:

01/10/17 17:39:01 (8 years ago)

Author:

nanardon

Message:

add some debug message, update dpmt for manager

Location:

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql

Files:

• Employment.pm (modified) (1 diff)
• User.pm (modified) (1 diff)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Employment.pm

@@ -398 +398 @@
 }
 
-
 sub _resetUser {
     my ($ouser) = @_;

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm

@@ -1578 +1578 @@
 
     if (keys %changes) {
+        $self->base->log(LA_DEBUG, 'Applying employment state to user %s for field %s', $self->id, join(', ', keys %changes));
         $self->ReportChange('Update', 'Update %s to match employment', join(', ', sort keys %changes));
-        $self->ReportChange('Update', 'Expire update to %s to match employment', ($changes{expire} || '(none)'))
-            if (exists($changes{expire}));
+        if (exists($changes{expire})) {
+            $self->ReportChange('Update', 'Expire update to %s to match employment', ($changes{expire} || '(none)'));
+            $self->base->log(LA_DEBUG, 'New expiration is %s for user %s', ($changes{expire} || '(none)'), $self->id);
+        }
         $self->set_fields(%changes);
+    } else {
+        $self->base->log(LA_DEBUG, 'No employment change for user %s', $self->id);
     }