Fix configuration Parser (#1603)
This commit is contained in:
parent
7b3e95a374
commit
0ffb9a4629
|
@ -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] )
|
||||
|
|
|
@ -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);
|
||||
|
|
Loading…
Reference in New Issue
Block a user