From 975c068c3b6d5f4645fcf1f5895e5c29f643fdf4 Mon Sep 17 00:00:00 2001
From: Patrick Meidl <pm2@sanger.ac.uk>
Date: Mon, 27 Aug 2007 10:54:44 +0000
Subject: [PATCH] minor fixes
---
modules/Bio/EnsEMBL/IdMapping/SyntenyRegion.pm | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/modules/Bio/EnsEMBL/IdMapping/SyntenyRegion.pm b/modules/Bio/EnsEMBL/IdMapping/SyntenyRegion.pm
index b8184cae5d..e019b4f9e2 100644
--- a/modules/Bio/EnsEMBL/IdMapping/SyntenyRegion.pm
+++ b/modules/Bio/EnsEMBL/IdMapping/SyntenyRegion.pm
@@ -177,6 +177,7 @@ sub merge {
#
# extend this SyntenyRegion to span a $factor * $score more area
+#
sub stretch {
my ($self, $factor) = @_;
@@ -185,10 +186,12 @@ sub stretch {
$self->source_start($self->source_start - $source_adjust);
$self->source_end($self->source_end + $source_adjust);
- my $target_factor = ($self->target_end - $self->target_start + 1) *
+ my $target_adjust = ($self->target_end - $self->target_start + 1) *
$factor * $self->score;
$self->target_start($self->target_start - $target_adjust);
$self->target_end($self->target_end + $target_adjust);
+
+ return $self;
}
--
GitLab