[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.617, Mon Sep 17 17:32:13 2007 UTC revision 1.618, Mon Sep 17 17:35:19 2007 UTC
# Line 832  Line 832 
832              my $file = "$genome_dir/$base";              my $file = "$genome_dir/$base";
833              my $rast = "$genome_dir/rast_$base";              my $rast = "$genome_dir/rast_$base";
834    
835              if (-f $base)              if (-f $file)
836              {              {
837                  print "Rename $base to $rast\n";                  print "Rename $file to $rast\n";
838                  rename($base, $rast);                  rename($file, $rast);
839              }              }
840              if (-f $imp)              if (-f $imp)
841              {              {
842                  print "Copy $imp to $base\n";                  print "Copy $imp to $file\n";
843                  copy($imp, $base);                  copy($imp, $file);
844              }              }
845          }          }
846      }      }

Legend:
Removed from v.1.617  
changed lines
  Added in v.1.618

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3