[Bio] / FigKernelPackages / raelib.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/raelib.pm

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

revision 1.1, Sat Jan 29 20:58:48 2005 UTC revision 1.2, Mon Jan 31 16:58:38 2005 UTC
# Line 32  Line 32 
32    if (/^>/) {print OUT; next}    if (/^>/) {print OUT; next}
33    chomp;    chomp;
34    my $done;    my $done;
35    foreach my $peg ($fig->by_alias($_)) {    foreach my $peg ($fig->by_alias("uni|$_")) {
36     print OUT $_, "\t", $peg, "\n";     print OUT $_, "\t", $peg, "\n";
37     $done=1;     $done=1;
38    }    }

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3