removed regulatory calls

modules/t/gene.t

@@ -3,7 +3,7 @@ use warnings;
 
 BEGIN { $| = 1;
 	use Test;
-	plan tests => 86;
+	plan tests => 84;
 }
 
 use Bio::EnsEMBL::Test::MultiTestDB;
@@ -633,15 +633,6 @@ ok($dbe_id && $dbe_id == $dbe->dbID());
 
 $multi->restore();
 
-# test regulatory feature retrieval
-my $rf_gene = $ga->fetch_by_dbID(18256);
-#ok(@{$rf_gene->get_all_regulatory_features()} == 1);  # non-recursive
-ok(@{$rf_gene->get_all_regulatory_features(1)} == 12); # recursive
-
-# test getting coded-for regulatory factors
-$gene = $ga->fetch_by_dbID(18271);
-my @factors = @{$gene->fetch_coded_for_regulatory_factors()};
-ok($factors[0]->dbID() == 5);
 
 #
 # tests for multiple versions of genes in a database

modules/t/transcript.t

@@ -4,7 +4,7 @@ use vars qw( $verbose );
 
 BEGIN { $| = 1;
 	use Test;
-	plan tests => 152;
+	plan tests => 151;
 }
 
 use Bio::EnsEMBL::Test::MultiTestDB;
@@ -699,11 +699,6 @@ sub test_trans_mapper_edits {
   print_coords(\@coords);
 }
 
-# test getting coded-for regualtory factors
-my $transcript_adaptor = $db->get_TranscriptAdaptor();
-my $transcript = $transcript_adaptor->fetch_by_dbID(21717);
-my @factors = @{$transcript->fetch_coded_for_regulatory_factors()};
-ok($factors[0]->dbID() == 2);
 
 #sleep 10;
 # test fetching by supporting evidence