Changeset 916 for LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Revaliases.pm

Timestamp:

03/22/12 18:49:38 (12 years ago)

Author:

nanardon

Message:

• change exported/unexported attributes of revaliases in same time than user, meaning destroyed user don't have revalias anymore

File:

• LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Revaliases.pm (modified) (1 diff)

LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Revaliases.pm

@@ -57 +57 @@
     my ($class, $base, $id, %data) = @_;
 
-    $base->get_object('user', $id) or do {
+    my $uobj = $base->get_object('user', $id) or do {
         $base->log(LA_ERR, 'Cannot create revaliases %s: no such user', $id);
         return;
     };
+    $data{exported} = $uobj->get_attributes('exported') || 0;
 
     $class->SUPER::_create($base, $id, %data);