Changeset 1737 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Group.pm

Timestamp:

03/29/16 17:37:22 (8 years ago)

Author:

nanardon

Message:

Add task modules

Add two task module:

• Unexportexpired: unexported expire aliases and nethost
• Updatedyndata: refresh aliases and group with autoMember settings

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Group.pm (modified) (3 diffs)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Group.pm

@@ -180 +180 @@
                 q{insert into group_attributes_users (value, attr, okey) values (?,?,?)}
             );
-            $sth->execute($_, 'memberUID', $self->_get_ikey);
-            $res++;
+            $res += $sth->execute($_, 'memberUID', $self->_get_ikey);
         } elsif ($member{$_}{c}) {
             if (($user->get_c_field('department') || '') eq $self->id) {
@@ -192 +191 @@
                 q{delete from group_attributes_users where value = ? and attr = ? and okey = ?}
             );
-            $sth->execute($_, 'memberUID', $self->_get_ikey);
-            $res++;
+            $res += $sth->execute($_, 'memberUID', $self->_get_ikey);
         } # else {} # can't happend
     }
@@ -216 +214 @@
     );
     my $filter = $self->get_field('autoMemberFilter');
-    $self->_set_group_members(
+    my $res = $self->_set_group_members(
         [ $self->base->search_objects(
             'user',
             ref $filter ? @{ $filter } : $filter
         ) ]
-    )
+    );
+    $res;
 }