Commit 237e7780 authored by Christophe Maudoux's avatar Christophe Maudoux

Fix configuration Parser & unit test (#1603)

parent 0ffb9a46
Pipeline #3827 passed with stages
in 11 minutes and 4 seconds
...@@ -544,6 +544,8 @@ sub _scanNodes { ...@@ -544,6 +544,8 @@ sub _scanNodes {
); );
@listCatRef = sort @listCatRef; @listCatRef = sort @listCatRef;
@listCatNew = sort @listCatNew; @listCatNew = sort @listCatNew;
hdebug( '# @listCatRef : ' . \@listCatRef );
hdebug( '# @listCatNew : ' . \@listCatNew );
for ( my $i = 0; $i < @listCatNew; $i++ ) { for ( my $i = 0; $i < @listCatNew; $i++ ) {
if ( not( defined $listCatRef[$i] ) if ( not( defined $listCatRef[$i] )
or $listCatRef[$i] ne $listCatNew[$i] ) or $listCatRef[$i] ne $listCatNew[$i] )
......
...@@ -37,7 +37,7 @@ foreach my $i (0 .. 1) { ...@@ -37,7 +37,7 @@ foreach my $i (0 .. 1) {
) or print STDERR Dumper($resBody); ) or print STDERR Dumper($resBody);
} }
ok( @{ $resBody->{details}->{__changes__} } == 22, ok( @{ $resBody->{details}->{__changes__} } == 20,
'JSON response contains 24 changes' 'JSON response contains 24 changes'
) or print STDERR Dumper($resBody); ) or print STDERR Dumper($resBody);
#print STDERR Dumper($resBody); #print STDERR Dumper($resBody);
......
Markdown is supported
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