Commit 773ccfe7 authored by Yadd's avatar Yadd

Avoid some warnings

parent 46b986a9
......@@ -99,7 +99,7 @@ sub unserialize {
$conf->{$k} = ( $v =~ /./ ? eval { from_json($v) } : {} );
if ($@) {
$Lemonldap::NG::Common::Conf::msg .=
"Unable to decode $k, probably old format. Trying... ($@)";
"Unable to decode $k, switching to old format.\n";
return $self->oldUnserialize($fields);
}
}
......
......@@ -49,6 +49,7 @@ $LLNG_DEFAULTCONFFILE = $ini->filename;
# Insert your test code below, the Test::More module is use()ed here so read
# its man page ( perldoc Test::More ) for help writing this test script.
$Lemonldap::NG::Handler::API::logLevel = 'error';
use_ok('Lemonldap::NG::Handler');
if ( $numTests == 3 ) {
......@@ -62,7 +63,7 @@ if ( $numTests == 3 ) {
my $ret;
$mock->fake_module(
'Lemonldap::NG::Handler::API',
newRequest => sub { print STDERR "newRequest\n" },
newRequest => sub { 1 },
header_in => sub { "" },
hostname => sub { 'test.example.com' },
is_initial_req => sub { '1' },
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment