Fix configuration Parser (#1603)

This commit is contained in:
Christophe Maudoux 2018-12-30 15:22:12 +01:00
parent 7b3e95a374
commit 0ffb9a4629
2 changed files with 3 additions and 1 deletions

View File

@ -542,6 +542,8 @@ sub _scanNodes {
: {}
}
);
@listCatRef = sort @listCatRef;
@listCatNew = sort @listCatNew;
for ( my $i = 0; $i < @listCatNew; $i++ ) {
if ( not( defined $listCatRef[$i] )
or $listCatRef[$i] ne $listCatNew[$i] )

View File

@ -52,7 +52,7 @@ ok( $resBody->{details}->{__needConfirmation__}->[0]->{message}
) or print STDERR Dumper($resBody);
ok( @{ $resBody->{details}->{__changes__} } == 24,
ok( @{ $resBody->{details}->{__changes__} } == 22,
'JSON response contains 24 changes'
) or print STDERR Dumper($resBody);
#print STDERR Dumper($resBody);