Fix configuration Parser & unit test (#1603)

This commit is contained in:
Christophe Maudoux 2018-12-30 16:11:09 +01:00
parent 0ffb9a4629
commit 237e7780c5
2 changed files with 3 additions and 1 deletions

View File

@ -544,6 +544,8 @@ sub _scanNodes {
);
@listCatRef = sort @listCatRef;
@listCatNew = sort @listCatNew;
hdebug( '# @listCatRef : ' . \@listCatRef );
hdebug( '# @listCatNew : ' . \@listCatNew );
for ( my $i = 0; $i < @listCatNew; $i++ ) {
if ( not( defined $listCatRef[$i] )
or $listCatRef[$i] ne $listCatNew[$i] )

View File

@ -37,7 +37,7 @@ foreach my $i (0 .. 1) {
) or print STDERR Dumper($resBody);
}
ok( @{ $resBody->{details}->{__changes__} } == 22,
ok( @{ $resBody->{details}->{__changes__} } == 20,
'JSON response contains 24 changes'
) or print STDERR Dumper($resBody);
#print STDERR Dumper($resBody);