[Bio] / FigKernelScripts / merge_translation_rules.pl Repository:
ViewVC logotype

Diff of /FigKernelScripts/merge_translation_rules.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4, Tue Dec 23 17:56:33 2003 UTC revision 1.5, Tue Feb 3 20:09:02 2004 UTC
# Line 18  Line 18 
18    
19  foreach $from (sort keys(%$trans))  foreach $from (sort keys(%$trans))
20  {  {
21      print "$from\t$trans->{$from}\n";      $to = $trans->{$from};
22        while ($trans->{$to})
23        {
24            $to = $trans->{$to};
25        }
26        print "$from\t$to\n";
27  }  }
28    
29  sub load {  sub load {

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3