Changeset 2039

Timestamp:

06/13/17 15:48:24 (7 years ago)

Author:

nanardon

Message:

Avoid undef

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ad/Group.pm (modified) (2 diffs)

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

@@ -168 +168 @@
             $val = [ $val ] unless(ref $val);
             my %users;
-            $users{$_}{e} = 1 foreach (@{ $self->get_field('memberUID') || []});
-            $users{$_}{n} = 1 foreach (@{ $val || []});
+            $users{$_}{e} = 1 foreach (grep { defined($_) } @{ $self->get_field('memberUID') || []});
+            $users{$_}{n} = 1 foreach (grep { defined($_) } @{ $val || []});
             foreach (keys %users) {
                 $users{$_}{e} && $users{$_}{n} and next;
@@ -183 +183 @@
             my %users;
             $val = [ $val ] unless(ref $val);
-            $users{$_}{e} = 1 foreach (@{ $self->get_field('member') || []});
+            $users{$_}{e} = 1 foreach (grep { defined($_) } @{ $self->get_field('member') || []});
             $users{$_}{n} = 1 foreach (grep { defined($_) } @{ $val || []});
             foreach (keys %users) {