Changeset 1915 for trunk

Timestamp:

01/06/17 18:36:42 (7 years ago)

Author:

nanardon

Message:

Fix log message

Location:

trunk/LATMOS-Accounts/lib/LATMOS/Accounts

Files:

• Log.pm (modified) (1 diff)
• Synchro.pm (modified) (1 diff)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Log.pm

@@ -180 +180 @@
         return;
     }
-    if ($level =~ /\D/) {
+    if ($level !~ /^\d$/) {
         # Wrong la_log usage
         my @call = caller();

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Synchro.pm

@@ -400 +400 @@
                 $self->write_status;
                 la_log(LA_NOTICE,
-                    "Update synch. status to %d for base %s to %s",
-                    $self->{current_rev}, $self->from->label, $destbase->label
+                    "Update synch. status to %s for base %s to %s",
+                    $self->{current_rev} || '(none)', $self->from->label, $destbase->label
                 ); 
             }