Changeset 1819 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Task/Expiredaliases.pm

Timestamp:

07/07/16 12:18:02 (8 years ago)

Author:

nanardon

Message:

use comment attribute to identifie aliases for expired account

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Task/Expiredaliases.pm (modified) (2 diffs)

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

@@ -40 +40 @@
     # Unset aliases when user get active:
 
-    my @aliases = $self->{_base}->search_objects('aliases', 'user.active=1', 'description=EXPIREDACCOUNT');
+    my @aliases = $self->{_base}->search_objects('aliases', 'user.active=1', 'comment=EXPIREDACCOUNT');
     foreach (@aliases) {
         $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");
         $self->{_base}->create_object('aliases', $user,
-            description => 'EXPIREDACCOUNT',
-            forward => [ $dest, "\\$user" ],
+            comment     => 'EXPIREDACCOUNT',
+            description => "Forward because $user is expired, do not remove or change",
+            forward     => [ $dest, "\\$user" ],
         );
         $self->{_base}->commit;