Changeset 1253 for trunk

Timestamp:

09/29/14 12:17:19 (10 years ago)

Author:

nanardon

Message:

fix expired account discovery

File:

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

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Maintenance.pm

@@ -195 +195 @@
 
     my %managers;
+    foreach my $user (@users) {
+        my $uobj = $self->_base->get_object('user', $user);
+        $uobj->get_attributes('unexported') and next; # can't happend
+        my $manager = $uobj->get_attributes('managerContact') || 'N/A';
+        push(@{$managers{$manager}{users}}, $uobj);
+    }
+
     if (my $accreq = $self->_base->get_object('accreq', 'user-removal')) {
 
@@ -202 +209 @@
         foreach my $user (@users) {
             my $uobj = $self->_base->get_object('user', $user);
-            $uobj->get_attributes('unexported') and next; # can't happend
-            my $manager = $uobj->get_attributes('managerContact') || 'N/A';
-            push(@{$managers{$manager}{users}}, $uobj);
 
             my $req = LATMOS::Accounts::Bases::Sql::DataRequest->new($accreq);