From f80ccae49ba59b24cd851c207ae27cdccbbd3201 Mon Sep 17 00:00:00 2001
From: Ian Longden <ianl@sanger.ac.uk>
Date: Mon, 20 Dec 2004 14:13:53 +0000
Subject: [PATCH] bug fix for last bug fix
---
misc-scripts/xref_mapping/XrefMapper/BasicMapper.pm | 7 +++++--
1 file changed, 5 insertions(+), 2 deletions(-)
diff --git a/misc-scripts/xref_mapping/XrefMapper/BasicMapper.pm b/misc-scripts/xref_mapping/XrefMapper/BasicMapper.pm
index e7c4b079a9..e33676991e 100644
--- a/misc-scripts/xref_mapping/XrefMapper/BasicMapper.pm
+++ b/misc-scripts/xref_mapping/XrefMapper/BasicMapper.pm
@@ -241,8 +241,11 @@ sub dump_xref{
$i++;
}
if($skip){
- $method[$i] = shift @$list;
- $self->method(\@method);
+ my $k = 0;
+ foreach my $list (@lists){
+ $method[$k++] = shift @$list;
+ }
+ $self->method(\@lists);
return;
}
}
--
GitLab