Use old parsers when needed

misc-scripts/xref_mapping/xref_config.ini

@@ -520,6 +520,7 @@ order           = 15
 priority        = 2
 prio_descr      = refseq
 parser          = RefSeqDatabaseParser
+old_parser      = RefSeqGPFFParser
 
 [source RefSeq_dna::gencode]
 # Used by human and mouse
@@ -543,6 +544,7 @@ order           = 15
 priority        = 2
 prio_descr      = refseq
 parser          = RefSeqDatabaseParser
+old_parser      = RefSeqGPFFParser
 
 [source RefSeq_dna::MULTI-complete]
 # Used by phaeodactylum_tricornutum
@@ -822,6 +824,7 @@ order           = 20
 priority        = 3
 prio_descr      = sequence_mapped
 parser          = UniProtDatabaseParser
+old_parser      = UniProtParser
 dependent_on    = MIM
 
 [source Uniprot/SPTREMBL::gencode]
@@ -850,6 +853,7 @@ order           = 20
 priority        = 3
 prio_descr      = sequence_mapped
 parser          = UniProtDatabaseParser
+old_parser      = UniProtParser
 dependent_on    = MIM
 
 [source Uniprot/SWISSPROT::gencode]

misc-scripts/xref_mapping/xref_config2sql.pl

@@ -187,9 +187,10 @@ foreach my $species_section ( sort( $config->GroupMembers('species') ) )
     print(   "INSERT INTO source_url "
            . "(source_id, species_id, parser)\n" );
 
+    my $parser = (defined($config->val($source_section, 'old_parser')) ? $config->val($source_section, 'old_parser') : $config->val($source_section, 'parser'));
     printf( "VALUES (%d, %d, '%s') ;\n",
             $source_ids{$source_section}, $species_id,
-            $config->val( $source_section, 'parser' ) );
+            $parser );
 
     print("\n");