Commit 0086a8b6 authored by Xavier Guimard's avatar Xavier Guimard

Propage r4064 to tests

parent e4e749d1
......@@ -28,9 +28,9 @@ ok( $resBody->{result} == 1, "JSON response contains \"result:1\"" )
ok( -f $confFiles->[1], 'File is created' );
my @changes = @{&changes};
my @cmsg = @{ $resBody->{details}->{changes} };
my @cmsg = @{ $resBody->{details}->{__changes__} };
ok( @changes == @cmsg, 'Same changes count' );
while ( my $c = shift @{ $resBody->{details}->{changes} } ) {
while ( my $c = shift @{ $resBody->{details}->{__changes__} } ) {
@changes = grep { $_->{key} ne $c->{key} } @changes;
@cmsg = grep { $_->{key} ne $c->{key} } @cmsg;
}
......
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