[Bio] / FigKernelScripts / run_glimmer3.pl Repository:
ViewVC logotype

Diff of /FigKernelScripts/run_glimmer3.pl

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

revision 1.5, Sun Sep 7 23:23:31 2008 UTC revision 1.6, Sun Sep 7 23:38:45 2008 UTC
# Line 73  Line 73 
73                  warn "Training contigs $training_contigs do not exist";                  warn "Training contigs $training_contigs do not exist";
74              }              }
75          }          }
         else {  
             $trouble = 1;  
             warn "Training argument $train is invalid";  
         }  
76          splice(@ARGV,$arg,1);          splice(@ARGV,$arg,1);
77      }      }
78      elsif ($ARGV[$arg] =~ m/^-{1,2}skip_called/) {      elsif ($ARGV[$arg] =~ m/^-{1,2}skip_called/) {
# Line 98  Line 94 
94    
95  if (@ARGV == 2) {  if (@ARGV == 2) {
96      ($taxon_ID, $contigs_file) = @ARGV;      ($taxon_ID, $contigs_file) = @ARGV;
97        if (! $training_contigs) { $training_contigs = $contigs_file }
98    
99      if ($taxon_ID && ($taxon_ID =~ m/^\d+\.\d+$/)) {      if ($taxon_ID && ($taxon_ID =~ m/^\d+\.\d+$/)) {
100          print STDERR "Taxon-ID is $taxon_ID\n" if $ENV{VERBOSE};          print STDERR "Taxon-ID is $taxon_ID\n" if $ENV{VERBOSE};

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3