Skip to content
Snippets Groups Projects
Commit 487d244b authored by Graham McVicker's avatar Graham McVicker
Browse files

removed tests for species methods

parent 9acb2f1e
No related branches found
No related tags found
No related merge requests found
......@@ -4,7 +4,7 @@ use warnings;
BEGIN { $| = 1;
use Test;
plan tests => 37;
plan tests => 36;
}
use MultiTestDB;
......@@ -50,17 +50,13 @@ ok( $gene->start() == 30735607 );
debug( "Gene end: ".$gene->end );
ok( $gene->end() == 30815178 );
my $species = $gene->species()->binomial();
debug( "Species: ".$species );
ok( $species eq "Homo sapiens" );
debug( "Gene external name: " . $gene->external_name );
ok( $gene->external_name eq "Q9H466");
debug( "Gene external dbname: " . $gene->external_db );
ok( $gene->external_db eq "SPTREMBL");
debug( "Gene display xref id: " . $gene->display_xref );
debug( "Gene display xref id: " . $gene->display_xref->dbID );
ok( $gene->display_xref->dbID() == 128324);
......
......@@ -5,7 +5,7 @@ use vars qw( $verbose );
BEGIN { $| = 1;
use Test;
plan tests => 30;
plan tests => 29;
}
use MultiTestDB;
......@@ -68,12 +68,6 @@ my $tr = $ta->fetch_by_stable_id( "ENST00000217347" );
ok( $tr );
my $species = $tr->species()->binomial();
debug( "Species: ".$species );
ok( $species eq "Homo sapiens" );
debug ( "External transcript name: " . $tr->external_name );
ok ( $tr->external_name eq "MAPRE1");
......
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