Changeset 1545 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Objects.pm

Timestamp:

12/28/15 12:01:15 (8 years ago)

Author:

nanardon

Message:

Ensure a clear message is given on error

File:

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

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

@@ -418 +418 @@
 
     if (!$self->checkValues($self->base, $self, %cdata)) {
+        my $last = LATMOS::Accounts::Log::lastmessage(LA_ERR);
         $self->base->log(LA_ERR,
-            "Cannot update %s (%s): wrong values",
-            $self->id, $self->type
+            "Cannot update %s (%s): wrong value%s",
+            $self->id, $self->type,
+            ($last ? ": $last" : $last)
         );
         return;