Commit 580c1618 authored by Yadd's avatar Yadd
Browse files

More debug

parent b1ce342b
...@@ -24,7 +24,7 @@ ok( ...@@ -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';
......
...@@ -48,7 +48,8 @@ for ( my $i = 0 ; $i < @test ; $i++ ) { ...@@ -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++;
}; };
} }
......
Supports Markdown
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