Changeset 2048

Timestamp:

06/14/17 16:00:46 (7 years ago)

Author:

nanardon

Message:

Fix: checkinput with no value

File:

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

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

@@ -267 +267 @@
     }
 
-    if ($self->{checkinput}) {
+    if (defined($values) && $self->{checkinput}) {
         foreach my $val (ref $values ? @{ $values } : $values) {
             if (!$self->{checkinput}->($val)) {