Skip to content
Snippets Groups Projects
Commit b7a5933d authored by Magali Ruffier's avatar Magali Ruffier
Browse files

updated test case with is calls replacing ok

also, when adding_mapping_path, do not expect the method to order coord systems by rank, it will use the first argument as assembled, the second argument as component
parent 74d53a7f
No related branches found
No related tags found
No related merge requests found
......@@ -173,16 +173,16 @@ $sth->finish();
#
my $new_paths = $csa->store_mapping_path( $cs, $cln_cs );
ok( @{$new_paths} == 1 &&
$new_paths->[0] eq 'clone|newsystem:NCBI35' );
is( @{$new_paths}, 1, "Stored one result");
is( $new_paths->[0], 'newsystem:NCBI35|clone', "It maps newsystem to clone" );
my $new_path = $csa->get_mapping_path( $cs, $cln_cs );
ok( @{$new_path} == 2 &&
$new_path->[0]->name eq 'clone' &&
$new_path->[1]->name eq 'newsystem' );
is( @{$new_path}, 2, "Stored two results");
is( $new_path->[0]->name, 'newsystem', "Assembled is newsystem" );
is( $new_path->[1]->name, 'clone', "Component is clone");
my $new_paths2 = $csa->store_mapping_path( $cs, $cln_cs );
ok( @{$new_paths2} == 0 ); # Should not update second time round
is( @{$new_paths2}, 0, "No mapping path was added" ); # Should not update second time round
#
# Do some inserting of mock coord systems and
......
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