get fetch all to ignore LRG_gene this makes it slower but if you are getting...

get fetch all to ignore LRG_gene this makes it slower but if you are getting all the them then this will be insignificant time difference

modules/Bio/EnsEMBL/DBSQL/ExonAdaptor.pm

@@ -119,6 +119,14 @@ sub _final_clause {
 }
 
 
+sub fetch_all {
+  my ($self) = @_;
+
+  my $constraint = 'e.biotype != "LRG_gene" and e.is_current = 1';
+  my @exons  = @{ $self->generic_fetch($constraint) };
+  return \@exons ;
+}
+
 =head2 fetch_by_stable_id
 
   Arg [1]    : string $stable_id

modules/Bio/EnsEMBL/DBSQL/GeneAdaptor.pm

@@ -282,6 +282,14 @@ sub fetch_all_by_biotype {
 }
 
 
+sub fetch_all {
+  my ($self) = @_;
+
+  my $constraint = 'g.biotype != "LRG_gene" and g.is_current = 1';
+  my @genes  = @{ $self->generic_fetch($constraint) };
+  return \@genes ;
+}
+
 
 =head2 fetch_all_versions_by_stable_id 
 

modules/Bio/EnsEMBL/DBSQL/TranscriptAdaptor.pm

@@ -160,6 +160,14 @@ sub fetch_by_stable_id {
 }
 
 
+sub fetch_all {
+  my ($self) = @_;
+
+  my $constraint = 't.biotype != "LRG_gene" and t.is_current = 1';
+  my @trans  = @{ $self->generic_fetch($constraint) };
+  return \@trans ;
+}
+
 =head2 fetch_all_versions_by_stable_id 
 
   Arg [1]     : String $stable_id