[Bio] / Sprout / SproutLoad.pm Repository:
ViewVC logotype

Diff of /Sprout/SproutLoad.pm

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

revision 1.57, Sat Jul 15 08:09:13 2006 UTC revision 1.58, Sun Jul 16 03:24:48 2006 UTC
# Line 1226  Line 1226 
1226      } else {      } else {
1227          Trace("Generating external data.") if T(2);          Trace("Generating external data.") if T(2);
1228          # We loop through the files one at a time. First, the organism file.          # We loop through the files one at a time. First, the organism file.
1229          Open(\*ORGS, "<$FIG_Config::global/ext_org.table");          Open(\*ORGS, "sort +0 -1 -u -t\"\t\" $FIG_Config::global/ext_org.table |");
1230          my $orgLine;          my $orgLine;
1231          while (defined($orgLine = <ORGS>)) {          while (defined($orgLine = <ORGS>)) {
1232              # Clean the input line.              # Clean the input line.
# Line 1238  Line 1238 
1238          close ORGS;          close ORGS;
1239          # Now the function file.          # Now the function file.
1240          my $funcLine;          my $funcLine;
1241          Open(\*FUNCS, "<$FIG_Config::global/ext_func.table");          Open(\*FUNCS, "sort +0 -1 -u -t\"\t\" $FIG_Config::global/ext_func.table |");
1242          while (defined($funcLine = <FUNCS>)) {          while (defined($funcLine = <FUNCS>)) {
1243              # Clean the line ending.              # Clean the line ending.
1244              chomp $funcLine;              chomp $funcLine;
Legend:
Removed from v.1.57  
changed lines
  Added in v.1.58
MCS Webmaster
 ViewVC Help
Powered by ViewVC 1.0.3