Commit e70da1f0 authored by Patrick Meidl's avatar Patrick Meidl
Browse files

minor refinement to overlaps()

parent 9edf71c8
......@@ -1058,8 +1058,11 @@ sub overlaps {
my $self = shift;
my $f = shift;
unless ($self->slice->seq_region_name eq $f->slice->seq_region_name) {
warning("Bio::EnsEMBL::Feature->overlaps(): features are on different seq_regions.");
my $sr1_name = $self->seq_region_name;
my $sr2_name = $f->seq_region_name;
if (!$sr1_name or !$sr2_name or ($sr1_name ne $sr2_name)) {
warning("Bio::EnsEMBL::Feature->overlaps(): features are on different seq regions (or not attached to a seq region at all).");
return undef;
}
......
Markdown is supported
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