More debug

This commit is contained in:
Xavier Guimard 2017-03-14 11:28:16 +00:00
parent b1ce342b2d
commit 580c161855
2 changed files with 3 additions and 2 deletions

View File

@ -24,7 +24,7 @@ ok(
/Error: Unknown package Lemonldap::NG::Common::Conf::Backends::bad\.$/ /Error: Unknown package Lemonldap::NG::Common::Conf::Backends::bad\.$/
), ),
'Bad module' 'Bad module'
); ) or print STDERR "Msg: $Lemonldap::NG::Common::Conf::msg\n";
$h = bless {}, 'Lemonldap::NG::Common::Conf'; $h = bless {}, 'Lemonldap::NG::Common::Conf';

View File

@ -48,7 +48,8 @@ for ( my $i = 0 ; $i < @test ; $i++ ) {
open F, 'file t/lmConf-1.json |'; open F, 'file t/lmConf-1.json |';
$_ = join( '', <F> ); $_ = join( '', <F> );
close F; 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++; $count++;
}; };
} }