From 4850cb84099f55ed3ac95f57bd91130b8756ae55 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Andreas=20Kusalananda=20K=C3=A4h=C3=A4ri?=
<ak4@sanger.ac.uk>
Date: Tue, 17 Aug 2010 15:21:37 +0000
Subject: [PATCH] Allow the slice() method to be used to undef the slice
("$f->slice(undef)").
---
modules/Bio/EnsEMBL/Feature.pm | 2 ++
1 file changed, 2 insertions(+)
diff --git a/modules/Bio/EnsEMBL/Feature.pm b/modules/Bio/EnsEMBL/Feature.pm
index 2fe6b32616..02ef4eafc9 100644
--- a/modules/Bio/EnsEMBL/Feature.pm
+++ b/modules/Bio/EnsEMBL/Feature.pm
@@ -379,6 +379,8 @@ sub slice {
}
$self->{'slice'} = $slice;
+ } elsif ( @_ > 1 ) {
+ undef $self->{'slice'};
}
return $self->{'slice'};
--
GitLab