Changeset 1819 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts
- Timestamp:
- 07/07/16 12:18:02 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Task/Expiredaliases.pm
r1815 r1819 40 40 # Unset aliases when user get active: 41 41 42 my @aliases = $self->{_base}->search_objects('aliases', 'user.active=1', ' description=EXPIREDACCOUNT');42 my @aliases = $self->{_base}->search_objects('aliases', 'user.active=1', 'comment=EXPIREDACCOUNT'); 43 43 foreach (@aliases) { 44 44 $self->{_base}->log(LA_NOTICE, 'Deleting aliases %s because user is active', $_); … … 58 58 $self->{_base}->log(LA_NOTICE, "Adding alias to expired user $user"); 59 59 $self->{_base}->create_object('aliases', $user, 60 description => 'EXPIREDACCOUNT', 61 forward => [ $dest, "\\$user" ], 60 comment => 'EXPIREDACCOUNT', 61 description => "Forward because $user is expired, do not remove or change", 62 forward => [ $dest, "\\$user" ], 62 63 ); 63 64 $self->{_base}->commit;
Note: See TracChangeset
for help on using the changeset viewer.