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

Diff of /FigKernelPackages/AliTrees.pm

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

revision 1.1, Thu Jul 12 17:52:56 2007 UTC revision 1.2, Fri Jul 13 22:37:49 2007 UTC
# Line 423  Line 423 
423      my $tmpdir = "$FIG_Config::var/Temp";      my $tmpdir = "$FIG_Config::var/Temp";
424      &FIG::verify_dir($tmpdir);      &FIG::verify_dir($tmpdir);
425      open(OUT,">$tmpdir/alignments.$$") || die "could not open $tmpdir/alignments.$$";      open(OUT,">$tmpdir/alignments.$$") || die "could not open $tmpdir/alignments.$$";
426      opendir(DIR,$data/Library) || die "could not open $data";      opendir(DIR,"$data/Library") || die "could not open $data";
427      my @alis = grep { $_ !~ /^\./ } readdir(DIR);      my @alis = grep { $_ !~ /^\./ } readdir(DIR);
428      closedir(DIR);      closedir(DIR);
429      foreach my $ali (@alis)      foreach my $ali (@alis)

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3