Skip to content
Snippets Groups Projects
Commit 3f294074 authored by Arne Stabenau's avatar Arne Stabenau
Browse files

bug fix

parent 99b2c5f0
No related branches found
No related tags found
No related merge requests found
......@@ -355,17 +355,18 @@ sub fetch_succ_by_arch_id {
my ( $new_stable_id, $new_version, $new_db_name );
$sth->bind_columns( \$new_stable_id, \$new_version, \$new_db_name );
while( $sth->fetch() ) {
my $new_arch_id = Bio::EnsEMBL::ArchiveStableId->new
(
-version => $new_version,
-stable_id => $new_stable_id,
-db_name => $new_db_name,
-adaptor => $self
);
_resolve_type( $new_arch_id );
push( @result, $new_arch_id );
if( defined $new_stable_id ) {
my $new_arch_id = Bio::EnsEMBL::ArchiveStableId->new
(
-version => $new_version,
-stable_id => $new_stable_id,
-db_name => $new_db_name,
-adaptor => $self
);
_resolve_type( $new_arch_id );
push( @result, $new_arch_id );
}
}
$sth->finish();
return \@result;
}
......
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