Changeset 1873 for trunk/LATMOS-Accounts/lib

Timestamp:

12/26/16 23:36:28 (8 years ago)

Author:

nanardon

Message:

Make DATEFLAG private

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Task/Delexpiredusers.pm (modified) (3 diffs)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Task/Delexpiredusers.pm

@@ -68 +68 @@
 sub runDelay { 60 * 60 }
 
-sub DATEFLAG { 'expireText' }
+sub _DATEFLAG { 'expireText' }
 
 sub init {
@@ -116 +116 @@
 
         if (my $val = $self->{_base}->get_global_value("expiredWarning.user.$user")) {
-            if ($val eq $ouser->get_attributes(DATEFLAG)) {
+            if ($val eq $ouser->get_attributes(_DATEFLAG)) {
                 # Warning has been already sent
                 next;
@@ -160 +160 @@
 
             foreach my $ouser (@{ $expired{$manager}{users}}) {
-                $self->{_base}->set_global_value('expiredWarning.user.' . $ouser->id, $ouser->get_attributes(DATEFLAG));
+                $self->{_base}->set_global_value('expiredWarning.user.' . $ouser->id, $ouser->get_attributes(_DATEFLAG));
             }
             $self->{_base}->commit;