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

Diff of /FigKernelPackages/P2Pupdate.pm

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

revision 1.12, Tue Dec 23 20:21:31 2003 UTC revision 1.13, Tue Dec 23 21:10:26 2003 UTC
# Line 403  Line 403 
403      closedir(TMP);      closedir(TMP);
404      foreach $genome (@genomes)      foreach $genome (@genomes)
405      {      {
406            next if (! -d "$fig_disk/FIG/Data/organisms/$genome);
407    
408          print STDERR "installing $fig_disk/FIG/Data/Organisms/$genome/annotations\n";          print STDERR "installing $fig_disk/FIG/Data/Organisms/$genome/annotations\n";
409          if (-s "$fig_disk/FIG/Data/Organisms/$genome/annotations")          if (-s "$fig_disk/FIG/Data/Organisms/$genome/annotations")
410          {          {
# Line 577  Line 579 
579      my $time_made = time;      my $time_made = time;
580      foreach $genome (@genomes)      foreach $genome (@genomes)
581      {      {
582            next if (! -d "$fig_disk/FIG/Data/Organisms/$genome)");
583    
584          @updates = &get_assignments_for_genome("$fig_disk/FIG/Data/Organisms",$genome,$who_from,"$fig_disk/BackupAssignments/New/Assignments/$genome",\@rules,\*LOG);          @updates = &get_assignments_for_genome("$fig_disk/FIG/Data/Organisms",$genome,$who_from,"$fig_disk/BackupAssignments/New/Assignments/$genome",\@rules,\*LOG);
585          my $tuple;          my $tuple;
586          foreach $tuple (@updates)          foreach $tuple (@updates)

Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3