Added list_dbIDs and list_stable_dbIDs.

modules/Bio/EnsEMBL/DBSQL/ExonAdaptor.pm

@@ -569,6 +569,38 @@ sub remove {
   $exon->{dbID} = undef;
 }
 
+=head2 list_dbIDs
 
+  Arg [1]    : none
+  Example    : @g_ids = $exon_adaptor->list_dbIDs();
+  Description: Gets an array of internal ids for all exons in the current db
+  Returntype : list of ints
+  Exceptions : none
+  Caller     : ?
+
+=cut
+
+sub list_dbIDs {
+   my ($self) = @_;
+
+   return $self->_list_dbIDs("exon");
+}
+
+=head2 list_stable_dbIDs
+
+  Arg [1]    : none
+  Example    : @stable_exon_ids = $exon_adaptor->list_stable_dbIDs();
+  Description: Gets an array of stable ids for all exons in the current db
+  Returntype : list of ints
+  Exceptions : none
+  Caller     : ?
+
+=cut
+
+sub list_stable_dbIDs {
+   my ($self) = @_;
+
+   return $self->_list_dbIDs("exon_stable_id", "stable_id");
+}
 
 1;

modules/Bio/EnsEMBL/DBSQL/TranslationAdaptor.pm

@@ -251,4 +251,38 @@ sub remove {
   $translation->dbID( undef ); #don't think this line works
 }
 
+=head2 list_dbIDs
+
+  Arg [1]    : none
+  Example    : @g_ids = $translation_adaptor->list_dbIDs();
+  Description: Gets an array of internal ids for all translations in the current db
+  Returntype : list of ints
+  Exceptions : none
+  Caller     : ?
+
+=cut
+
+sub list_dbIDs {
+   my ($self) = @_;
+
+   return $self->_list_dbIDs("translation");
+}
+
+=head2 list_stable_dbIDs
+
+  Arg [1]    : none
+  Example    : @stable_translation_ids = $translation_adaptor->list_stable_dbIDs();
+  Description: Gets an array of stable ids for all translations in the current db
+  Returntype : list of ints
+  Exceptions : none
+  Caller     : ?
+
+=cut
+
+sub list_stable_dbIDs {
+   my ($self) = @_;
+
+   return $self->_list_dbIDs("translation_stable_id", "stable_id");
+}
+
 1;