Changeset 2039 for trunk/LATMOS-Accounts/lib
- Timestamp:
- 06/13/17 15:48:24 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ad/Group.pm
r1932 r2039 168 168 $val = [ $val ] unless(ref $val); 169 169 my %users; 170 $users{$_}{e} = 1 foreach ( @{ $self->get_field('memberUID') || []});171 $users{$_}{n} = 1 foreach ( @{ $val || []});170 $users{$_}{e} = 1 foreach (grep { defined($_) } @{ $self->get_field('memberUID') || []}); 171 $users{$_}{n} = 1 foreach (grep { defined($_) } @{ $val || []}); 172 172 foreach (keys %users) { 173 173 $users{$_}{e} && $users{$_}{n} and next; … … 183 183 my %users; 184 184 $val = [ $val ] unless(ref $val); 185 $users{$_}{e} = 1 foreach ( @{ $self->get_field('member') || []});185 $users{$_}{e} = 1 foreach (grep { defined($_) } @{ $self->get_field('member') || []}); 186 186 $users{$_}{n} = 1 foreach (grep { defined($_) } @{ $val || []}); 187 187 foreach (keys %users) {
Note: See TracChangeset
for help on using the changeset viewer.