From db6402d18eccaf9ffd030afdf01e18ddcb6e72cf Mon Sep 17 00:00:00 2001
From: Ian Longden <ianl@sanger.ac.uk>
Date: Tue, 19 Oct 2004 10:19:50 +0000
Subject: [PATCH] method missed if dumpcheck set

---
 misc-scripts/xref_mapping/XrefMapper/BasicMapper.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/misc-scripts/xref_mapping/XrefMapper/BasicMapper.pm b/misc-scripts/xref_mapping/XrefMapper/BasicMapper.pm
index 2af3514976..405c988271 100644
--- a/misc-scripts/xref_mapping/XrefMapper/BasicMapper.pm
+++ b/misc-scripts/xref_mapping/XrefMapper/BasicMapper.pm
@@ -227,6 +227,7 @@ sub dump_xref{
   if(defined($self->dumpcheck())){
     my $skip = 1;
     foreach my $list (@lists){
+      $method[$i] = shift @$list;
       if(!-e $xref->dir()."/xref_".$i."_dna.fasta"){ 
 	$skip = 0;
       }
@@ -236,6 +237,7 @@ sub dump_xref{
       $i++;
     }
     if($skip){
+      $self->method(\@method);
       return;
     }
   }
-- 
GitLab