Changeset 1877 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts
- Timestamp:
- 12/27/16 09:51:05 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Task/Delexpiredusers.pm
r1873 r1877 179 179 my $expiredDate = DateTime->now()->subtract(days => $warnDelay + $unexportDelay); 180 180 181 my $waitAfterModif = DateTime->now->subtract( hours => 3 )->iso8601; 182 181 183 foreach my $user ($self->{_base}->search_objects('user', 182 'exported=1', 'expired<' . $expiredDate->ymd('-'), 'oalias=NULL')) { 184 'exported=1', 185 'expired<' . $expiredDate->ymd('-'), 186 'date>' . $waitAfterModif, 187 'oalias=NULL' 188 )) { 183 189 my $ouser = $self->{_base}->get_object('user', $user) or next; 184 190 if ($ouser->get_attributes('nextEmployment')) {
Note: See TracChangeset
for help on using the changeset viewer.