diff --git a/lemonldap-ng-common/t/01-Common-Conf.t b/lemonldap-ng-common/t/01-Common-Conf.t index 5c3b48f14..43fa14141 100644 --- a/lemonldap-ng-common/t/01-Common-Conf.t +++ b/lemonldap-ng-common/t/01-Common-Conf.t @@ -24,7 +24,7 @@ ok( /Error: Unknown package Lemonldap::NG::Common::Conf::Backends::bad\.$/ ), 'Bad module' -); +) or print STDERR "Msg: $Lemonldap::NG::Common::Conf::msg\n"; $h = bless {}, 'Lemonldap::NG::Common::Conf'; diff --git a/lemonldap-ng-common/t/02-Common-Conf-File.t b/lemonldap-ng-common/t/02-Common-Conf-File.t index b37c35770..afa281ec7 100644 --- a/lemonldap-ng-common/t/02-Common-Conf-File.t +++ b/lemonldap-ng-common/t/02-Common-Conf-File.t @@ -48,7 +48,8 @@ for ( my $i = 0 ; $i < @test ; $i++ ) { open F, 'file t/lmConf-1.json |'; $_ = join( '', ); close F; - ok( /(ascii|utf-?8)/si, "File is $1 encoded" ); + ok( /(ascii|utf-?8)/si, "File is $1 encoded" ) + or print STDERR "Result: $_\n"; $count++; }; }