Allow LRGSlice in transfer()

3d11fdf0 · Glenn Proctor · 3bd47a9a · 3d11fdf0
Commit 3d11fdf0 authored May 04, 2010 by Glenn Proctor
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

modules/Bio/EnsEMBL/Feature.pm modules/Bio/EnsEMBL/Feature.pm +1 -1

No files found.
--- a/modules/Bio/EnsEMBL/Feature.pm
+++ b/modules/Bio/EnsEMBL/Feature.pm
@@ -538,7 +538,7 @@ sub transfer {
  my $self = shift;
  my $slice = shift;

-  if(!$slice || !ref($slice) || !$slice->isa('Bio::EnsEMBL::Slice')) {
+  if(!$slice || !ref($slice) || (!$slice->isa('Bio::EnsEMBL::Slice') && !$slice->isa('Bio::EnsEMBL::LRGSlice'))) {
    throw('Slice argument is required');
  }