Changeset 1839 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases

Timestamp:

09/13/16 18:55:53 (8 years ago)

Author:

nanardon

Message:

Fix value test on undef list

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Attributes.pm (modified) (1 diff)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Attributes.pm

@@ -240 +240 @@
     my ($self, $values) = @_;
 
-    foreach my $value (ref $values ? @{ $values } : $values) {
+    foreach my $value (grep { $_ } (ref $values ? @{ $values } : $values)) {
         if (!$self->checkinputformat($value)) {
             $self->base->log(LA_ERR, "Wrong format for  %s/%s: %s",