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

Diff of /FigKernelPackages/FIG.pm

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

revision 1.467, Fri May 5 16:43:09 2006 UTC revision 1.468, Sat May 6 19:25:14 2006 UTC
# Line 3888  Line 3888 
3888              $genus_species->{$pair->[0]} = $pair->[1];              $genus_species->{$pair->[0]} = $pair->[1];
3889          }          }
3890          $ans = $genus_species->{$genome};          $ans = $genus_species->{$genome};
3891            if ((! $ans) && open(GEN,"<$FIG_Config::organisms/$genome/GENOME"))
3892            {
3893                $ans = <GEN>;
3894                close(GEN);
3895                chomp $ans;
3896                $genus_species->{$genome} = $ans;
3897            }
3898      }      }
3899      return $ans;      return $ans;
3900  }  }

Legend:
Removed from v.1.467  
changed lines
  Added in v.1.468

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3