Skip to content
Snippets Groups Projects
Commit bc8c502d authored by Glenn Proctor's avatar Glenn Proctor
Browse files

Fixes to reflect new test db

parent 5fa40e2e
No related branches found
No related tags found
No related merge requests found
......@@ -35,15 +35,15 @@ ok($feat->strand == 1);
my $rma = $db->get_RegulatoryFactorAdaptor();
my $factor = $rma->fetch_by_name('hsa-miR-138');
ok($factor);
ok(@{$rfa->fetch_all_by_factor($factor)} == 2);
ok(@{$rfa->fetch_all_by_factor($factor)} == 3);
# List_dbids
my $ids = $rfa->list_dbIDs();
ok (@{$ids});
# test fetch_all_by_transcript
my $transcript = $db->get_TranscriptAdaptor()->fetch_by_dbID(21740);
ok(@{$rfa->fetch_all_by_transcript($transcript)} == 13);
my $transcript = $db->get_TranscriptAdaptor()->fetch_by_stable_id("ENST00000217299");
ok(@{$rfa->fetch_all_by_transcript($transcript)} == 14);
# Test store
......
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