Changeset 1223 for trunk

Timestamp:

04/17/13 18:23:57 (11 years ago)

Author:

nanardon

Message:

ajout d'un message de debug

File:

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

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

@@ -41 +41 @@
     my $pclass = ucfirst(lc($type));
     eval "require LATMOS::Accounts::Bases::$pclass;";
-    if ($@) { return } # error message ?
+    if ($@) {
+        la_log(LA_DEBUG, "Failed to load base type `%s': %s", $type, $@);
+        return
+    }
     my $base = "LATMOS::Accounts::Bases::$pclass"->new(%{$options->{params}})
         or return;