diff --git a/misc-scripts/xref_mapping/XrefMapper/BasicMapper.pm b/misc-scripts/xref_mapping/XrefMapper/BasicMapper.pm
index e7c4b079a9b1e97fa7975d365b92c24ece9734e0..e33676991ea12b8ae48fca24e5da17bde4c2c14f 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;
     }
   }